首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>0 Then in=m+n/3 N
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>0 Then in=m+n/3 N
admin
2012-03-22
83
问题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>0 Then in=m+n/3 Next Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是
选项
A、15
B、18
C、21
D、24
答案
C
解析
[命题目的] 考查考生对If条件语句的应用情况。
[解题要点] n从1到20,循环共执行20次,当n=21时,循环条件不成立,循环结束,最后输出n的值为21。因此,选项C)正确。
[错解分析] If语句是判断每个条件是否成立,第一次碰到条件成立的表达式,执行其后面的语句后退出If语句。
[考点链接] Visual Basic基础知识。
转载请注明原文地址:https://kaotiyun.com/show/qhhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
软件生命周期包括8个阶段。为了使各时期的任务更明确,又可分为3个时期:软件定义期、软件开发期、软件维护期。编码和测试属于______期。
设有整形数组的定义inta[]==newint[8],则a.length的值为()。
检查软件产品是否符合需求定义的过程称为( )。
下面是用户程序对Applet类中方法paint()的重新定义。根据程序功能,在指定的空白处填上适当的语句或语法成分。publicvoidpaint(Graphicsg) {g.______(“你好!”,10,20);}
下列关于线程调度的叙述中,错误的是()。
语句publicStringgetEncoding()的功能是( )。
在窗体上画一个名称为Text1的文本框,然后画三个单选按钮,并用这三个单选按钮建立一个控件数组,名称为Option1,程序运行后,如果单击某个单选按钮,则文本框中的字体将根据所选择的单选按钮切换,如图所示,请填空。PrivateSubOption1
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: PrivateSubCommand1_Click() Text1.Text="Visual" Me.Text1="Basic"
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: PrivateSubCommand1_Click() a=12345 PrintFormat$(a,"000.00") EndSub 程序运行后,单击命令按钮,窗
在窗体上画一个名称为List1的列表框,为了对列表框中的每个项目都能进行处理,应使用的循环语句为
随机试题
MS——DOS操作系统删除子目录的命令是()。
某工作第4周之后的计划进度与实际进度如下图所示,从图中可获得的正确信息有()。
电影院幕布的燃烧性能不能低于()。
一般情况下,当会员某品种持仓合约的投机头寸达到交易所对其规定的投机头寸持仓限量的( )以上(含本数)时,该会员应向交易所报告其资金情况、头寸情况等。
简述题目难度的含义,结合中学物理教学说明控制题目难度的意义。
教育目的规定了教育活动所应培养的人才质量和规格,实际上就是规定了教育活动的最大方向,这体现了教育目的的()
在德意志帝国时期,德国教育形成了典型的三轨学制,产生了三种学校。其中,专门为上层阶级设立的学校是
秦简《法律答问》记载:“甲小未盈六尺,有马一匹自牧之,今马为人败,食人稼一石,问当论不当?不当论及偿稼。”依照该解答,秦律判断责任能力的标准是()。
A、Togivecarswarnings.B、Toslowdowncars.C、Tomakecarsstop.D、Tomonitorcars.B本题考查事实。由句(5)可知,减速带的作用就是迫使汽车减速。故B为答案。
A、Becauseairline’scomputersystemssellticketsrandomly.B、Becauseairlineclerkspromotelesspopularflights.C、Becausepeo
最新回复
(
0
)