Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles _
Button1.Click, _
Button2.Click, _
Button3.Click
Me.Text = "หิวข้าว"
End Sub
Private Sub frmSaleProduct_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
If e.KeyCode = Keys.Enter Then
MsgBox("555")
End If
If e.KeyCode = Keys.Delete Then
MsgBox("555")
End If
If e.KeyCode = Keys.NumLock Then
MsgBox("555")
End If
End Sub