VB程序不知道那错了

麻烦大家一下 我想问一 下我写的这段VB程序那里错了，小弟出学找不出问题所在Private Sub RunCommand_Click()

Dim a As Single, b As Single, j As Single

a = Val(InputText.Text)

b = Val(InputText.Text)

c = a * b

OutputText3.Text = c

End Sub

我来回答一下，可能错误有以下几点：

1、变量C没有声明（如果C是全局变量就没错）

2、最大的错误在这两句

a = Val(InputText.Text)

b = Val(InputText.Text)

没有判断输入的值inputtext.text是否可以转换成Single,如果不能则肯定会报错。那下一步就也会错。