'Programınız arkaplanda calışırken klavye tuşlarını algılama;
'1 adet timer ekleyin ve intervalini 100 yapın
'Aşağıdaki kodu bir module icine kaydedin
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Public Const VK_TAB = &H9 'Burada ornek olarak tab,f1,f2,f7,f8,f10 ve f11 tuşları verilmiştir
Public Const VK_F1 = &H70 'Daha fazla tuş icin constantlar api wiewer text (Basic ile gelir) 'de vardır.
Public Const VK_F10 = &H79
Public Const VK_F11 = &H7A
Public Const VK_F2 = &H71
Public Const VK_F7 = &H76
Public Const VK_F8 = &H77
'Aşağıdaki kodu timer icine yazın
Private Sub Timer1_Timer()
If GetAsyncKeyState(VK_F2) Then 'Program dışında F2 tuşuna basılırsa
MsgBox "bastın"
End If
End Sub
Kaynak site: vbprogramlama.tr.cx
__________________
Program arka planda calışırken klavye tuşlarına basıldığını algılama
Programlama0 Mesaj
●20 Görüntüleme
- ReadBull.net
- Programlama ve Yazılım
- Programlama
- Program arka planda calışırken klavye tuşlarına basıldığını algılama