首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0到100分之间,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。rtm35命令按钮的Click的事件代码如下: Private Sub run35_
在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0到100分之间,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。rtm35命令按钮的Click的事件代码如下: Private Sub run35_
admin
2017-06-22
38
问题
在窗体中有一个名称为run35的命令按钮,单击该按钮从键盘接收学生成绩,如果输入的成绩不在0到100分之间,则要求重新输入;如果输入的成绩正确,则进入后续程序处理。rtm35命令按钮的Click的事件代码如下:
Private Sub run35_Click()
Dim flag As Boolcan
result=0 : flag=True
Do While flag
result=Val(InputBox(”请输入学生成绩:,”输入”))
If result>=0 And result<=1 00 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/0dgp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序:PublicxAsIntegerPrivateSubCommandl__Click()x=3Callf1Callf2
下面程序的输出结果为___________。a=4.5b=-123c=Len(Str(b)+Str(a))MsgBoxC
按照逻辑结构分类,结构可以分为线性结构和非线性结构,栈属于_____________。
在窗体上画一个名称为C1的命令按钮,然后编写如下事件过程:PrivateSubCl_Click()a=0n=InputBox(“”)Fori=1Ton
软件是程序、数据和______________的集合。
如果加载一个窗体,先被触发的事件是()。
在使用Dim语句定义数组时,在缺省情况下数组下标的下限为______________。
窗体中有一命令按钮,名称为Commandl。要求在窗体视图中单击此命令按钮后,命令按钮上面的文字变为加粗,实现该操作的VBA语句是______________。
VBA程序流程控制的方式有()。
随机试题
材料管理要编制多种计划,下列关于材料计划的编制顺序正确的是()。
能引起乳酸脱氢酶同工酶LD5明显升高的疾病不包括
可摘局部义齿人工牙中半解剖式牙的牙尖斜度是
女,35岁,四个月来,胸背部麻木,逐渐发展至双足部,两月来,双下肢无力,小便不易解出。体检双下肢肌张力增高,跟膝反射亢进,双侧巴氏征(+),胸10以下针刺觉减退。诊断考虑
对于开放性颅脑损伤的首选紧急处理应该是
以样本股的发行量或成交量作为权数计算的股价平均数是( )。
改善我国商业银行经营与管理的主要条件是建立规范的法人治理结构和()。
在通胀预期的大背景下,黄金作为硬通货,更有利于保存和增值,因而得到了更多人的________。但真正的利润获得者只有少数,当多数人都发现了某一市场的利润空间,正________着这是获利者清盘了结盈利的最佳时间点。填入画横线部分最恰当的一项是:
Asababyemergesfromthedarknessofthewombwitharudimentarysenseofvision,itwouldberatedabout20/500,orlegallyb
______fromthetopofthehill,thecitytakestheroundshapewithaflowingriverthroughit.
最新回复
(
0
)