Start Menu Handle?

[Illspirit]

How can i get the handle of the start menu?

[Megatron]

Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
 
Private Sub Command1_Clik()
    hStart = FindWindowEx(FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString), 0, "Button", vbNullString)
End Sub

[Illspirit]

thanx