2

让我先说我环顾四周，我想我的问题太具体了，无法得到任何直接的结果。这也是我的第一个 VB 项目。

我正在尝试制作一个简单的销售点 GUI。我有两个文本框（价格、现金）和 11 个按钮来制作数字键盘。我想要做的是能够单击数字键盘按钮（例如，按钮“1”和“0”输入 10 美元），然后转到光标最后单击的文本框。

所以这里有一个例子：我点击文本框“价格”，然后点击按钮“1”和按钮“0”。这将在“价格”文本框中输入 10。之后，我希望能够单击“Cash Tendered”文本框并能够使用与以前相同的数字键盘按钮进行相同的操作。

提供了 GUI的图片。

4

1 回答 1

2

您可以使用布尔值来跟踪上次选择的文本框

当您单击价格文本框时，将布尔值设置为真。当您单击 Cash Tendered 文本框时，将布尔值设置为 false。当您单击键盘中的一个数字按钮时，测试布尔值以查看最后选择的文本框，然后将数字输入该文本框。

例子：

Public Class Form1

    Dim lastClickedTextBox1 As Boolean

    Private Sub TextBox1_Click(sender As Object, e As EventArgs) Handles TextBox1.Click
        lastClickedTextBox1 = True
    End Sub

    Private Sub TextBox2_Click(sender As Object, e As EventArgs) Handles TextBox2.Click
        lastClickedTextBox1 = False
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If lastClickedTextBox1 = True Then
            TextBox1.Text = "Box 1 was it"
        Else
            TextBox2.Text = "Box 2 was it"
        End If
    End Sub
End Class
于 2013-04-10T16:47:27.657 回答