Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Public Class Form1
- Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
- Private syl form_load()
- Timer1.Interval = "100"
- End Sub
- Private Sub timer1_timer()
- If (getkeypress)(vbKeyF1) Then
- Second key(text1.text) + ("(enter)")
- End If
- End Sub
- End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement