Visual Basic - Descartar la pulsación de la tecla Win

Hola a todos!
Necesito que alguien me ayude. Quiero lograr (obviamente desde el VB) de alguna manera que cuando se presione la tecla de Windows (en XP y 2000) no suceda nada. Yo pongo un form maximizado y necesito que cuando se presione la tecla de Windows no aparezca el menú Inicio.
Si alguien tiene algún dato para aportar, muchas gracias. Si no, muchas gracias también.
Saludos.

Bueno...
En principio hay que saber que la tecla WIN izquierda es es el número 91 de ASCII y la derecha es el número 92; al menos en mi ordenador así es.

Ahora introduce este código en el procedimiento KeyPress de donde corresponda:
If KeyAscii = 91 OR KeyAscii = 92 Then KeyAscii = 0

El KeyAscii = 0 es para que no haga nada.

Eso ya lo probé pero no funciona en WinXP. Desplega el menú "Inicio" de todas formas. ¿Se te ocurre de alguna otra manera? ¿Con alguna API que intercepte esa pulsación?
Muchas gracias.

Prueba con este codigo, si bien no inhabilita la tecla, al menos la cierra de inmediato, tal vez de sirva de base para lograr exactamente lo que quieres...

Salu2..from Tampico

En una forma copia este codigo:, debes tener un timer con intervalo de 100 milisegundos llamado timer1

Const KEYEVENTF_KEYUP = &H2
Const VK_LWIN = &H5B
Const VK_RWIN = &H5C

Private Sub Form_Load()
w = 0
w2 = 0
End Sub

Private Sub Timer1_Timer()
w = GetKeyState(VK_LWIN)
w2 = GetKeyState(VK_RWIN)
If w Or w2 Then
If w Then
keybd_event VK_LWIN, 0, 0, 0
keybd_event VK_LWIN, 0, KEYEVENTF_KEYUP, 0
End If
If w2 Then
keybd_event VK_RWIN, 0, 0, 0
keybd_event VK_RWIN, 0, KEYEVENTF_KEYUP, 0
End If
'MsgBox "PULSASTE TECLA WIN"
w = 0
w2 = 0
End If
End Sub

En un modulo copia esto:

Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Public Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer

Espero te sea de utilidad...

Gracias. Voy a probar. Después te cuento...