( 35 ) 在窗体中有一个名称为 run35 的命令按钮 , 单击该按钮从键盘接收学生成绩 , 如果输入的成绩不 在0 到 100 分之间,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。 run35 命令按钮的 Click 的事件代码如下:Private Sub run35_Click( )Dim flag As Boolcanresult=0flag=TrueDo While flagresult=Val(InputBox(" 请输入学生成绩 :", " 输入 "))If result=0 And result =100 Then___________ElseMsgBox " 成绩输入错误,请重新输入 "End IfLoopRem 成绩输入正确后的程序代码略End Sub程序中有一空白处,需要填入一条语句使程序完成其功能。下列选项中错误的语句是( ) 。A ) flag=FalseB ) flag=Not flagC ) flag=TrueD ) Exit Do

( 35 ) 在窗体中有一个名称为 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


相关考题:

窗体中有一命令按钮,名称为Commandl。要求在窗体视图中单击此命令按钮后,命令按钮上面的文字变为加粗,实现该操作的VBA语句是__________。

在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在。到100分之间,则要求重新输入:如果输入的成绩正确,则进入后续程序处理。run35命令按钮的Click的事件代码如下: Private Sub run35_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=FalseB.flag=Not flagC.flag=TrueD.Exit Do

某窗体中有一个命令按钮,在“窗体”视图中单击该命令按钮可以打开另一个窗体,则需要执行的宏操作是( )。A.OpenQueryB.OpenReportC.OpenWindowD.OpenForm

翻在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0~100分,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。run35命令按钮的Click的事件代码如下。 Private Sub run35_Click( ) Dim flag As Boolcanresult=0flag=TrueDo While flagresult=Val(InputBox("请输入学生成绩:","输入"))Ifresult&gt;=0 And result&lt;=100 ThenElseMsgBox”成绩输入错误,请重新输入”EndIfLoopRem。成绩输入正确后的程序代码略 End Sub程序中有一空白处,需要填人一条语句使程序完成其功能。下列选项中错误的语句是( )。【考点4 VBA流程控制语句】A.flag=FalseB.flag=Not flagC.flag=TrueD.Exit Do

在窗体中有一个名称为run1的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0~100分之间,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。run1命令按钮的Click的事件代码如下: Private Sub run1_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 Rein '成绩输入正确后的程序代码略 End Sub 程序中有一空白处,需要填入一条语句使程序完成其功能。下列选项中错误的语句是( )。A.flag=FalseB.flag=Not flagC.flag=TrueD.Exit Do

某窗体中有一个命令按钮,在“窗体”视图中单击该命令按钮,可以运行另一个应用程序。如果通过调用宏对象来完成此功能,则需要执行的宏操作是( )。A.RunAppB.RunCodeC.RunMacroD.RunSQL

在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在O~100分之间,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。run35命令按钮的Click的事件代码如下: PrivateSub run35_ClickDim flag As Boolcanresult=O flag=True Do Whileflag result=Val(InputBox(”请输入学生成绩:”,”输入”)) Ifresult=0 And result=100 Then __________ Else MsgBox”成绩输入错误,请重新输入” End If Loop Rem成绩输入正确后的程序代码略 End Sub 程序中的空白处需要填入一条语句使程序完成其功能。下列选项中错误的语句是( )。A.flag=FalseB.flag=Not flagC.flag=TrueD.Exit Do

窗体中有一命令按钮,名称为Command1。要求在窗体视图中单击此命令按钮后,命令按钮上面的文字变为加粗,实现该操作的VBA语句是______。

窗体中有一个名称为Button1的命令按钮,和一个Label1控件对象,编写如下事件过程: 程序运行后,单击命令按钮,如果输入3,则在Label1显示的内容是()A3B4C5D6