vill göra ett mini program

Tja! Vill göra ett mini program som gör att capslock + scrolllock börjar blinka... hur gör jag de?
Har skapat en timer och skrivet denna kod:

Private Sub tmrKeys_Timer()
SendKeys "{CAPSLOCK}"
SendKeys "{SCROLLLOCK}"
End Sub

men vad ska jag mer skriva??

Vad händer nu när du kör programmet?

En grej du kan göra är ju att använda dig av API.

keybd_event(145,0,0,0)
keybd_event(145,0,KEYEVENTF_KEYUP,0)
keybd_event(20,0,0,0)
keybd_event(20,0,KEYEVENTF_KEYUP,0)

i delphi är de bara att använda de och vara glad, men i vb måste man deklarerar de på nåt sätt har jag för mig

hittas troligtvis lättast i API-viewern.

Const KEYEVENTF_EXTENDEDKEY = &H1
Const KEYEVENTF_KEYUP = &H2
Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Sub Form_Unload(Cancel As Integer)
keybd_event 145, 0, 0, 0
keybd_event 20, 0, 0, 0
End Sub

Private Sub Timer1_Timer()
    keybd_event 145, 0, 0, 0
    keybd_event 145, 0, KEYEVENTF_KEYUP, 0
    keybd_event 20, 0, 0, 0
    keybd_event 20, 0, KEYEVENTF_KEYUP, 0
End Sub

lägg in en Timer med en interval på tex 200