首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Commandl的命令按钮,编写如下事件过程: Private Sub Commandl_Click() n=0 For i=0 To 10 X=2*i一1 IfX Mod 3=0 Then n=n+1 Next i Print n E
在窗体上画一个名称为Commandl的命令按钮,编写如下事件过程: Private Sub Commandl_Click() n=0 For i=0 To 10 X=2*i一1 IfX Mod 3=0 Then n=n+1 Next i Print n E
admin
2015-11-24
43
问题
在窗体上画一个名称为Commandl的命令按钮,编写如下事件过程:
Private Sub Commandl_Click()
n=0
For i=0 To 10
X=2*i一1
IfX Mod 3=0 Then n=n+1
Next i
Print n
End Sub
运行程序,单击命令按钮,则窗体上显示的是
选项
A、1
B、3
C、5
D、7
答案
B
解析
本题的For循环共执行11次,在每次循环中计算出一个x的值,然后判断能否被3整除,如能整除则令计数器n自加1。
转载请注明原文地址:https://kaotiyun.com/show/sRLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
检查软件产品是否符合需求定义的过程称为
在面向对象程序设计中,从外面看只能看到对象的外部特征,而不知道也无需知道数据的具体结构以及实现操作的算法,这称为对象的______。
下列程序的运行结果是()。PrivateFunctionmyfun(m,n)DoWhilem>nDoWhilem>n:m=m-n:LoopDoWhilen>m:n=n-m:LoopLoopmyfun=mEndFun
程序的3种基本控制结构是______。
下列程序中,a,b,c代表一个三角形的三条边,程序的作用是判断一个三角形是否成立,请填写空白处。Ifa+b<c______b+c<a______a+c<bThenMsgBox("这三条边不能构成一个三角形")EndIf
下列程序功能是,产生10个0~100的随机数,输出其中的最大值。请将程序补充完整。PrivateSubForm_Click()Diman(10)AsIntegerDimmaxAsIntegerRandomizeFori%=1T
在窗体上画一个文本框,名称为Text1,画一个命令按钮,名称为Command1。程序运行时,单击命令按钮,能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test.dat中。请在空格处填上适当的内容,将程序补充完整。PrivateSubCo
设有命令按钮Command1的单击事件过程,代码如下,请填空。PrivateSubCommand1_Click()Dima(30)AsIntegerFori=1To30a(i)=iNextForEacharrItem__
程序运行时,用户向文本框输入内容时,将触发文本框的()事件。
滚动条的最小值属性是______,最大值属性是Max。
随机试题
小肠大部分切除所致的腹泻属于
哮喘持续状态指哮喘发作持续超过
(2006年)能同时溶解Zn(OH)2、AgI和Fe(OH)3三种沉淀的试剂是()。
【背景资料】某项目部承接一项顶管工程,其中DN1350mm管道为东西走向,长度90m,DN1050mm管道为偏东南方向走向,长度80m。设计要求始发工作井y采用沉井法施工。接收井A、C为其他标段施工(如图5-1所示)。项目部按程序和要求完成了各项
下列关于等式“收入-费用=利润”的说法中正确的有()。
根据以下材料。回答下列题目:王某与张某育有二子,长子王文,次子王武。王文娶妻李某,2003年生有一子王小甲。王文于2007年5月遇车祸身亡。王某于2008年10月病故,留有与张某婚后修建的面积相同的房屋6间。王某过世后张某随儿媳李某生活,6问房屋暂时由次
商业票据的抽象性和无因性是指商业票据只反映货币的债券债务关系,而不反映交易的内容。( )
中国人民银行负责国家的金融稳定,防范和化解()。
OntheeveningbeforeAllSaints’Dayin1517,MartinLuthernailed95thesestothedoorofachurchinWittenberg.Inthoseda
A、Theywillbemorecarefulinbuyingpresents.B、Theywilllearnhowtobudgetandinvestinthefuture.C、Theywillbemoreli
最新回复
(
0
)