首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有文本框Textl和标签Labell。运行程序,输人大于0的整数m,单击按钮Command1,程序判断m是否为素数,若是素数,则Label1显示“m是素数”,否则显示“m是合数”。事件代码如下: Private Sub Commandl_Cl
窗体中有文本框Textl和标签Labell。运行程序,输人大于0的整数m,单击按钮Command1,程序判断m是否为素数,若是素数,则Label1显示“m是素数”,否则显示“m是合数”。事件代码如下: Private Sub Commandl_Cl
admin
2019-02-19
47
问题
窗体中有文本框Textl和标签Labell。运行程序,输人大于0的整数m,单击按钮Command1,程序判断m是否为素数,若是素数,则Label1显示“m是素数”,否则显示“m是合数”。事件代码如下:
Private Sub Commandl_Click()
m=Val(Me!Textl)
result=m&"是素数"
k=2
Do While k<=m/2
If m Mod k=0 Then
result=m&"是合数"
【 】
End If
k=k+1
Loop
Me!Label1.Caption=result
End Sub
程序【 】处应填写的语句是( )。
选项
A、Exit
B、Exit Loop
C、Exit While
D、Exit Do
答案
D
解析
依照题意,空白处添加的语句应该是满足条件便退出循环。Exit Do用来提前中断并退出Do While循环。
转载请注明原文地址:https://kaotiyun.com/show/eh0p777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个数据库文件“samp3.mdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。请在此基础上按照以下要求补充设计。(1)设置表对象“tEmp”中“聘用时间”字段的有效性规则为
窗口事件是指操作窗口时所引发的事件,下列不属于窗口事件的是()。
在考生文件夹下的“sampl.mdb”数据库文件中已建立两个表对象(名为“员工表”和“部门表”)和一个窗体对象(名为“fTest”)及一个宏对象(名为“mTest”)。请按以下要求,按顺序完成对象的各种操作。(1)删除表对象“员工表”的照片字段。
考生文件夹下有一个数据库文件“samp3.mdb”,其中存在已经设计好的表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。请在此基础上按照以下要求补充设计。(1)将表对象“tEmp”中“聘用时间”字段的格式调整为
有如下程序段:DimstrAsString*10DimiStrl=“abcdefg”i=12lenl=Len(i)str2=Right(str1,4)执行后,len1和str
设有如下3个关系表下列操作中正确的是()。
(1)有一个名为samp1.mdb数据库。修改职工表“employee”,增加“姓名”字段。其数据类型为文本型长度为6,并对应职工号添加其姓名,见下表。(2)判断并设置表“employee”的主键,同时将上面增加的“姓名”字段隐藏。(3)设置表“emp
在VBA中,如果没有显式声明或用符号来定义变量的数据类型,变量的默认数据类型为()。
InputBox函数的返回值类型是()。
随机试题
患者,男性,25岁。突发神志不清10分钟入院,检查发现患者心跳呼吸已停止,予复苏10分钟后患者恢复自主心律,血压120/86mmHg,自主呼吸存在,但昏迷。此时最主要的脑复苏措施如下,除外
不符合霍奇金病诊断论述的是
A.心肝阴虚B.心脾两虚C.心胆气虚D.心肾阴虚E.心阴亏虚患者瘿肿质软,目突手颤。口干目涩,心悸心慌,消谷善饥,腰膝酸软,耳呜目眩,舌红少苔,脉细数。其证型是()
我同《刑法》第232条规定“故意杀人的”构成故意杀人罪,该条采用了:
根据《水利工程施工监理规范》(SL288—2014),水利工程建设项目施工监理的主要工作方法,不包括()。
甲公司是一家从事房地产开发的公司。2012年9月,该公司向某银行提出6000万元贷款需求,因抵押物不足等问题,贷款未能获批。因公司在建房地产项目即将竣工,急需资金完成后续建设,甲公司找到某银行客户经理刘俊希望其帮助解决公司资金需求,并提出利率可以商量。
在航次租船合同下,()必须按合同的规定,按时抵达装货港及装卸指定货物,并按时运抵目的港。
被称为“中国科学史上的里程碑”的著作是()。
ICMP差错报告报文格式中,除了类型、代码和校验和外,还需加上()。
Wheredidthisconversationprobablytakeplace?
最新回复
(
0
)