Vb.net 如何设置代码，以便在文本框中单击鼠标输入信息？

在Visual Basic 2010中。我有两个文本框和一个数字键盘。每次单击一个数字时，该数字都会显示在两个文本框中。我是如何做到的，所以我需要先点击文本框，然后只在文本框中输入数字？？这就是我的代码中的内容。如何更改它，以便必须单击文本框才能输入数字？谢谢

 Private Sub btn5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn5.Click
    mtbNum.Text += "5"
    txtQuantity1.Text += "5"
End Sub

Private Sub btn6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn6.Click
    mtbNum.Text += "6"
    txtQuantity1.Text += "6"
End Sub

Private Sub btn7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn7.Click
    mtbNum.Text += "7"
    txtQuantity1.Text += "7"
End Sub

---

假设您正在根据所选的标记查找VB.Net答案。这里有一个关于类似问题的帖子

---

请尝试以下代码

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

---

这是我最后一次尝试，除非您发布更多代码。

请发布您已经拥有的代码的相关部分。Metro？WinForms？WPF？银灯？Windows Phone？ASP.Net？MonoTouch？在每个“使用此框”旁边都放一个复选框，这样用户就可以清楚地知道希望他们做什么才能使其正常工作。这是非常奇怪的行为，你能提供你的代码示例plz吗？我已经检查了他们的答案，但对我的答案不起作用。我希望能够将我创建的键盘上的数字输入到不同的文本框中。但是每次我点击一个数字，它就会进入所有的文本框。你输入的代码片段只显示两个文本框，并且代码告诉它同时进入两个文本框。查看我的答案。感谢您的帮助，当我在mtbNum文本框中输入数字时，它会起作用，但当我在txtQuantity1中输入数字时，数字会再次输入两个文本框。这必须对每个键都执行。此外，请查看KeyPreview方法。然后你只能在聚焦文本框中捕捉按键。我添加到每个按键。很抱歉，我上次的评论有错误。当我为txtQuantity1输入一个数字时，它会显示在mtbNum文本框中。还有，什么是按键预览法？这是屏幕键盘吗？就像计算器一样，它是一个屏幕键盘。它只有十个数字为1-0的按钮。