问题
单项选择题
在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0~100分,则要求重新输入;如果输入的成绩正确,则进人后续程序处理。run35命令按钮的Click的事件代码如下:
Private Sub run35_Click()
Dim flag As Boolcan
result=0
flag=True
Do While flag
result=Val(InputBox("请输入学生成绩:","输入"))
If result>=0 And result<=100 Then
______
Else
MsgBox"成绩输入错误,请重新输入"
End If
Loop
Rem成绩输入正确后的程序代码略
End Sub
程序中的空白处需要填入一条语句使程序完成其功能。下列选项中错误的语句是( )。
A.flag=False
B.flag=Not flag
C.flag=True
D.Exit Do
答案
参考答案:C
解析: 本题中的空白处实现的功能应该是结束循环,根据循环条件可知,无论是把flag设置为False或者NOTFlag都可以退出循环,Exit Do语句当然也可以退出循环,但C选项则会造成死循环,不能退出。