Hiding the TitleBar of a Mdi Form

Hi guys...

Can you please tell me how i can hide the title bar of mdi form.

Main application titlebar or child window titlebar?

And for what purpose?

set the .BorderStyle property to 0

Good old GetWindowLong and SetWindowLong ;)

Option Explicit

Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long

Const WS_CAPTION = &HC00000
Const GWL_STYLE = (-16)

Private Sub MDIForm_Load()
Dim lStyle As Long
lStyle = GetWindowLong(Me.hwnd, GWL_STYLE)

lStyle = lStyle And (Not WS_CAPTION)
SetWindowLong Me.hwnd, GWL_STYLE, lStyle
End Sub

Thanks a lot.....Squirm.....for this wonderful and short way.