请大家帮助看看,我的程序代码错在哪里?谢谢!(已经解决)
编写一个单击窗体程序,要求用户通过输入框输入A B C三个值,在窗体输出最大的一个。
Private Sub Form_Load()
MsgBox "单击窗体", , "提示"
End Sub
Private Sub Form_Click()
Dim a As Single, b As Single, c As Single
a = InputBox("请输入变量A的值", "输入")
b = InputBox("请输入变量B的值", "输入")
c = InputBox("请输入变量C的值", "输入")
If a > b Then
If a > c Then
Print "最大的数是a:" & a
Else
Print "最大的数是c:" & c
End If
Else
Print "最大的数是b:" & b
End If
End Sub
[此贴子已经被作者于2006-11-3 18:02:41编辑过]