窗体标题栏高度在是多少，在vb里是什么常量？

Question

谢谢

Answer 1

谢谢，怎样把标题栏设为不可见？我把frm.caption=""还可见呀？谢谢

Answer 2

form的属性borderstyle=0如果实在想看到高度，给段代码Option Explicit
Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
Private Const SM_CYCAPTION = 4&Private Sub Command1_Click()
    msgbox "标题条高度=" & GetSystemMetrics(SM_CYCAPTION)
End Sub

Answer 3

大概是405twip,
仅仅是我多次实验的结果。