这段VB代码该怎样修改才可以正常调试?来看看答案是怎样的
这是个根据分数给出评价的程序,代码如下:
Private Sub Command1_Click()
Dim a As Single
a = Val(Text1.Text)
If a > 100 Or a < 0 Then
MsgBox ("invalid!")
End If
If a = 100 Then
MsgBox ("terrific!")
End If
I...
原创
2018-08-11 11:50:37 ·
382 阅读 ·
0 评论