运行下面的 Visual Basic程序,单击命令按钮 Command1,出现如下图所示的提示信息:出现该错误的原因是( )
Private Sub Command1_Click()
Dim a As Single, b As Single
a = Val(Text1.Text)
b = 10
If a >= b
b = a * a + 2 * b
End If
Label1.Caption = Str(b)
End Sub
A . If语句缺少Then
B . If语句缺少Else
C . 变量a的数据类型说明错误
D . 变量b的数据类型说明错误
答案:A