You want the text of a button, to reflect which keys have been pressed, is that right?
Code:Private Sub Form1_KeyUp(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyUp Button1.Text += Chr(e.KeyValue) End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.KeyPreview = True Button1.Text = String.Empty End Sub




Reply With Quote