帮我看看这里哪里错了

Private Sub AddOption_Click()
SymbelLabel.Caption = "+"
'改变运算符号为+
OutputText.Text = " "
'将计算结果改为空
End Sub

Private Sub DivideOption_Click()
SymbelLabel.Caption = "\"
'改变运算符号为\
OutputText.Text = " "
'将计算结果改为空
End Sub

Private Sub MinusOption_Click()
SymbelLabel.Caption = "-"
'改变运算符号为-
OutputText.Text = " "
'将计算结果改为空
End Sub

Private Sub MultiOption_Click()
SymbelLabel.Caption = "*"
'改变运算符号为*
OutputText.Text = " "
'将计算结果改为空
End Sub

Private Sub RunCommand_Click()
Dim Number1 As Single, Number2 As Single, Result As Single
'变量声明
Number1 = Val(InputText1.Text)
Number2 = Val(InputText2.Text)
'获取计算数据
If AddOption.Value = Ture Then
Result = Number1 + Number2
End If

If MinusOption.

帮忙看看这里哪里错了？？ 哪里错了大虾帮我看看！！ C++..帮我看看哪里错了... 帮我看看哪里错了 请高手进来帮我看看,这里先谢了!!! 帮我看看我的域名哪里错了!!!!!1 这里有医生吗?帮我看看.. 帮我看看~！在这里谢谢大家了~帮我出出点子！！ 请帮我看看~！在这里谢谢大家了~帮我出出点子！！ 谁帮我看看这个C程序哪里错了