0

嗨，我们的讲师要求我们创建一个仅使用按钮输入值的计算器，它应该在第一个文本框中输入 value1，然后在 vb6 的下一个文本框中输入另一个值

有没有办法使用相同的按钮在下一个文本框中输入值？

假设您按下按钮 3 后，它将显示在 textbox1 上

Text1.Text = "3"

我的问题是它在显示我已经尝试过的数字 3 后不会转到下一个文本框

    If Text2.Setfoucs = True Then
    Text2.Text = "3"
    Else
    Text1.Text = "3"
    End If

它给了我错误。

我只是想在第一个文本框中使用第二个文本框后使用相同的按钮

我想在按下第一个按钮后使用另一组按钮并设置 visible = true 以便下一个按钮

Text2.Text = "3"

我只是 VB6 的初学者，任何建议将不胜感激。

这是项目的样子

http://i.imgur.com/ixK9s1U.png

4

1 回答 1

1

setFocus是一个函数，而不是变量，并且它不返回值，因此您不能在 if 子句中使用它。

这是我完成您想要做的事情的建议：

将 GotFocus 事件添加到每个文本框，设置一个变量。像这样：

Private selectedTxtBox As Integer

Private Sub Text1_GotFocus()
    selectedTxtBox = 1
End Sub

Private Sub Text2_GotFocus()
    selectedTxtBox = 2
End Sub

然后在您的按钮上，您可以执行以下操作：

If selectedTxtBox = 1 Then
    Text1.Text = "3"
ElseIf selectedTxtBox = 2 Then
    Text2.Text = "3"
End If
于 2013-08-02T12:16:27.580 回答