窗体中有一个名为run的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0到100分之间,则要求重新输入;如果输入的成绩正确,则进入后续处理。run命令按钮的Click的事件代码如下: Private Sub run_Click()

admin2018-01-25  29

问题 窗体中有一个名为run的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0到100分之间,则要求重新输入;如果输入的成绩正确,则进入后续处理。run命令按钮的Click的事件代码如下:
    Private Sub run_Click()
    Dim flag As Boolean
    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=True
B、flag=False
C、flag=Not flag
D、Exit Do

答案A

解析 判断输入的成绩在正确范围内,则进入后续处理,即flag=True,答案选A。
转载请注明原文地址:https://jikaoti.com/ti/BK10FFFM
0

最新回复(0)