Question

在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

Answer 1

请尝试以下代码。

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

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

Answer 2

假设您正在寻找基于您选择的标记的VB.Net答案。这是一个讨论类似问题的主题。

How to check focused TextBox in vb.net winforms?

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

2 个答案: