windows api

how do i disable the windows start menu key from my applicatin and again restore it without restarting

VB Code:

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 Declare Function EnableWindow Lib "user32" (ByVal hwnd As Long, ByVal fEnable As Long) As Long
 
Private Sub Command1_Click()
Static bEnabled As Boolean
    Dim lhWnd As Long
 
    lhWnd = FindWindowEx(0&, 0&, "Shell_TrayWnd", vbNullString)
    lhWnd = FindWindowEx(lhWnd, 0&, "Button", vbNullString)
    Call EnableWindow(lhWnd, bEnabled)
    bEnabled = Not bEnabled
 
End Sub