在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
答案 0 :(得分: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
这是我的最后一次尝试,除非您发布更多代码。
答案 1 :(得分:0)
假设您正在寻找基于您选择的标记的VB.Net答案。这是一个讨论类似问题的主题。