首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0到100分之间,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。 run35命令按钮的Click的事件代码如下: Pfivate Sub run35_Cli
在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0到100分之间,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。 run35命令按钮的Click的事件代码如下: Pfivate Sub run35_Cli
admin
2015-12-15
104
问题
在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0到100分之间,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。
run35命令按钮的Click的事件代码如下:
Pfivate Sub run35_Click()
Dim flagAs 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=False
B、flag=Not flag
C、flag=True
D、Exit Do
答案
C
解析
根据题目要求,当输入正确的成绩后,进入后续的程序处理,Flag初始为。True,进入do while循环,循环条件为Flag。当输入错误的成绩时,提示信息并不改变Flag标记,即还为True,继续进行循环;当输入正确成绩时,应将Flag标记为False,这样才可以跳出循环,继续后续的程序处理,否则将一直停留在循环这里。
转载请注明原文地址:https://kaotiyun.com/show/lxgp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在"窗体视图"显示窗体时,要求在单击命令按钮后标签上显示的文字颜色变为红色,以下能实现该操作的语句是
Access数据库中哪个数据库对象是其他数据库对象的基础?
在SQL查询中使用WHERE了句指出的是______。
在创建交叉表查询时,用户需要指定()种字段。
以下关于报表组成的叙述中,错误的是()。
在窗体上画两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:PrivateSubCommandl_Click()Text1="VBprogramming"Text2=Text1Textl="ABCD"EndSub程序
将E-R图转换到关系模式时,实体与联系都可以表示成______。
在单链表中,增加头结点的目的是______。
语句DimNewArray(10)AsInteger的含义是()。
如果一个教师可以讲授多门课程,一门课程可以由多个教师来讲授,则教师与课程存在的联系是()。
随机试题
甲公司经常派业务员乙与丙公司订立合同。乙调离后,又持盖有甲公司公章的合同书与尚不知其已经调离的丙公司订立一份合同,并按照通常做法提走货款,后逃匿。对此甲公司并不知情。丙公司要求甲公司履行合同,甲公司认为该合同与己无关,予以拒绝。对此,下列表述正确的是(
ABS、SAN、HIPS都是苯乙烯系列合成树脂。
行政环境的基本属性有:________、________、________、________。
全国各族人民团结凝聚的核心是
Thefactoryhasdonegoodhonourtothegovernmentandthepeoplearoundsothatvisitorscometoit______.
用以复现和保存计量单位量值,经国务院计量行政部门批准作为统一全国量值最高依据的计量器具是()。
按照《公约》的规定,一项发盘的内容必须十分肯定,只有具备()才算十分确定。
Ahouseisthemostexpensivethingmostpeoplewilleverbuy.Veryfewpeoplehaveenoughmoneyoftheirowntobuyahome,so
不等式3|x-2|+x≤10的解集为()
TheWorld’sLongestBridgeRumorhasitthatalegendarysix-headedmonsterlurksinthedeepwatersoftheTyrhenianSeabe
最新回复
(
0
)