2012-08-23 67 views
-1

我已经这样做了几天。 我想要做的是当我进入。我在txtbox1中输入的数字将乘以12,然后将输出显示到txtbox2。但没有运气。有人能帮助我吗? 这里是我的代码:Visual Basic Keydown计算

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

此代码包含比代码行更多的错误。在继续之前,请先阅读有关VB的入门书。 –

回答

1

应该

a = txt1.Text 

,而不是

txt1.Text = a 

否则,您只需设置txt1.Text0


顺便说一句,你应该propbaly使用TryParse方法,以确保没有厚望被抛出时,在文本框中的文本中不包含一个有效的数字。

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