单选题
程序中有一空白处,需要填入一条语句使程序完成其功能。下列选项中错误的语句是______。 Private Sub run35_Click() Dim flag As Boolean result=0 flag=True Do While flag result=Val (InputBox("请输入学生成绩: ","输入")) If resuh>=0 And result<=100 Then ______ Else MsgSox "成绩输入错误,请重新输入" End If Loop Rem '成绩输入正确后的程序代码略 End Sub A.flag=False B.flag=Not flag C.flag=True D.Exit Do
【正确答案】
C
【答案解析】Do…While…Loop循环结构是在条件式为真时,执行循环体,并持续到条件式结果为假或执行到Exit Do语句而退出循环。 通过题面要求,事件代码中“If result>=0 And result<=100 Then”就是判断输入的成绩是否在0~100分之间,而“Else MsgBox”成绩输入错误,请重新输入””则是对输入的成绩不在0~100分之间的情况进行处理,所以可以判断出,要求填空的部分应该是针对输入成绩正确的情况进行处理,即代码判断条件满足,退出循环。本题中A、B、D三个选项均可以使程序退出循环,而C选项,则会使循环继续下去,成为死循环。所以本题答案为C。