У формы есть заголовок, рамка, клиентская часть.
Как определить высоту заголовка форма, т.е. ту ее часть которая сверху, обычно синяя и за которую ее можно таскать :).
Попытался так:
sngHeight = Me.Height - Me.ScaleHeight
получается не очень точно.
Подозрение, что высоту рамки надо еще отнять. Если причина в этом, то как размеры рамки (окаймляющей окно) определить?

Нашел ответ на свой вопрос.

С помощью Win32 API функции

Public Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long

Public Const SM_CYCAPTION = 4
Public Const SM_CYFRAME = 33
Public Const SM_CXFRAME = 32

Dim lCaptionHeight As Long
Dim lFrameHeight As Long
Dim lFrameWidth As Long

' Высота заголовка формы
lCaptionHeight = GetSystemMetrics(SM_CYCAPTION)

' Высота рамки окна с изменяемыми размерами
lFrameHeight = GetSystemMetrics(SM_CYFRAME)

' Ширина рамки окна с изменяемыми размерами
lFrameWidth = GetSystemMetrics(SM_CXFRAME)