0

我对 VB 很陌生,为了获得更多经验,我正在尝试构建一个计算器。我有它的工作形式,但想启用数字键盘键将数字输入标签。我试过搜索但没有运气。我看到的所有信息都是旧的,这可能是它不起作用的原因。如果您能提供帮助,那就太好了!谢谢!

好的,我已经找到并修改了这段代码,它通过将数字打印到标签上让我更进一步,但现在我不知道如何输入一行数字。每次按键后,它会删除先前键入的号码以替换为新号码。有什么建议么?

代码:

Sub Calculator_KeyPress(ByVal sender As Object, ByVal e As KeyPressEventArgs) Handles Me.KeyPress
    If e.KeyChar >= ChrW(48) And e.KeyChar <= ChrW(57) Then
        Label1.Text = e.KeyChar.ToString()

    End If
End Sub
4

1 回答 1

0

我确实需要一些睡眠,我应该知道这一点。由于有很多人在寻找这个答案,所以我将把它搁置。

正确代码:

Sub Calculator_KeyPress(ByVal sender As Object, ByVal e As KeyPressEventArgs) Handles Me.KeyPress
    If e.KeyChar >= ChrW(48) And e.KeyChar <= ChrW(57) Then
        Label1.Text = Label1.Text + e.KeyChar.ToString()
    End If
End Sub
于 2014-12-22T02:58:54.427 回答