Visual Basic Keydown计算

时间:2012-08-23 10:31:00

标签: vb.net

我已经这样做了几天。  我想要做的就是当我点击进入。我在txtbox1中输入的数字将乘以12,然后将输出显示为txtbox2。但没有运气。有谁可以帮助我吗? 这是我的代码:

Private Sub txt1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txt1.KeyDown
    Dim a, b, c As Integer
    txt1.Text = a
    b=a*12
    If e.KeyCode = Keys.Enter Then
      txt2.text = b
    End If
End Sub

1 个答案:

答案 0 :(得分:1)

应该是

a = txt1.Text

而不是

txt1.Text = a

否则,您只需将txt1.Text设置为0


顺便说一句,你应该使用TryParse方法,以确保当文本框中的文本不包含有效数字时不会引发任何预期。

Dim number = 0
If e.KeyCode = Keys.Enter AndAlso Int32.TryParse(txt1.Text, number) Then
    txt2.Text = (number * 12).ToString()
End If