如何啓用數字鍵盤鍵在VB中顯示數字標籤

Question

我對VB非常陌生，爲了獲得更多的經驗，我正在嘗試構建計算器。我有一個工作表格，但希望啓用數字鍵盤鍵將數字輸入到標籤。我試過搜索，但沒有運氣。我見過的所有信息都很舊，這可能是它不工作的原因。如果你能幫上忙，那就太棒了！謝謝！

好吧，我已經找到並修改了這段代碼，它讓我更進一步地將數字打印到標籤上，但現在我無法弄清楚如何輸入一行數字。在每次keydown之後，它將刪除先前的鍵控號碼以替換新號碼。有什麼建議麼？

代碼：

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 

Answer 1

我切切實實需要一些睡眠我應該知道的..因爲有是很多人在那裏尋找這個答案，我只是要離開它。

正確的代碼：

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