如何设置文本框点击事件，以便我可以从屏幕键盘向文本框输入数字

Question

在Visual Basic 2010中。我有两个文本框和一个屏幕数字键盘。每次我点击一个数字，该数字都会显示在两个文本框中。我如何做到我需要先点击文本框，然后只在该文本框中输入数字？？这就是我代码中的内容，但它不起作用。我试图在mtbNum文本框和txtQuantity1中输入的数字，无论我点击哪个文本框，都只显示mtbNumber文本框。我的教授说要将文本框的点击事件更改为textbox_click。然而，我不知道从那里去哪里。有人能帮帮我吗？如何更改它，以便必须单击文本框才能输入数字？求你了，谢谢你。

Private Sub btn5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn5.Click
    If mtbNum.Focus = True Then
        mtbNum.Text += "5"
    ElseIf txtQuantity1.Focus = True Then
        txtQuantity1.Text += "5"
    Else
    End If
End Sub
Private Sub mtbNum_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mtbNum.Click
End Sub
Private Sub txtQuantity1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtQuantity1.Click
End Sub

Answer 1

不清楚你想要什么，但我认为你正在寻找这个。如果这不是你想要的，我会删除它。

解决方案1:

if txt1.setFocus=true then
'do the button code
else if txt2.setFocus=true then
'do button code
end if

解决方案2：*更好的是，有一个checkBox，这样用户就可以清楚地选择他/她要输入的textbox，比如：

if chk1.checked = true then
txt1.setFocus
'do button code
else if chk2.checked = true then
txt2.setFocus
'do button code
end if