在窗体上画一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click() n=0 For i=0 To 10 X=2*i=1 IfX Mod 3=0 Then n=

admin2020-04-18 52

问题在窗体上画一个名称为Command1的命令按钮，编写如下事件过程：
Private Sub Command1_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://www.kaotiyun.com/show/xeTp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

单击命令按钮执行以下程序，输出结果为()。PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx＝12：y＝32CallProc(x，y)
下面是求最大公约数的函数的首部()。Functionfun(ByValxAsInteger，ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数，下面正确的语句是
某人编写了下面的程序，希望能把Text1文本框中的内容写到Temp．txt文件中PrivateSubCommand1_Click()Open"Temp．txt"ForOutputAs＃2Print"Text1"
在窗体上有一个名称为Label1的标签和一个名称为Timer1的计时器，并编写有如下几个事件过程：PrivateSubForm_Load()Timer1．Enabled＝FalseTimer1．Interval＝____
窗体如图所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击“删除”按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能：PrivateSubCommand1Click()
单击一次命令按钮，下列程序代码的执行结果为()。PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera＝2：b＝3：c＝4
设有变量声明为“DimaDateAsDate”，则能为变量aDate正确赋值的表达方式是()。
关于MDI窗体下列说法正确的是()。
运行下面的程序，单击命令按钮，输出结果为()。FunctionF(aAsInteger)b＝0：Staticcb＝b＋1：c＝c＋1：F＝a＋b＋cEndFunctionPfivateS
以下关于VB的叙述中，错误的是

随机试题

结核菌素试验阳性提示
女性，50岁，B超查体发现胆囊内多发小结石，一天前吃烤鸭后突发右上腹痛，向右肩部放射伴恶心。此病人最可能的诊断是
为适应技术进步、产品更新换代较快的形势，C公司于2020年初购置了一台生产设备，购置成本为4000万元，预计使用年限为8年，预计净残值为5％。经税务机关批准，该公司采用年数总和法计提折旧。C公司适用的所得税税率为25％。2013年C公司当年亏损2600
下列票据的取得行为中，票据持有人不得享有票据权利的有()。
装卸搬运效率的高低，取决于设备本身的性能和装卸搬运设施的完善状况，这是从()的角度来看的。
张先生，70岁，因脑血栓在家卧床2个月，大小便失禁，不能自行翻身，近日尾骶部皮肤呈紫红色，出现水疱。根据上述材料提供的信息，回答下列问题：应给予哪些护理措施以防止压疮加重?
如下图所示为一个TCP主机中的拥塞窗口的变化过程，这里最大数据段长度为1024字节，请回答如下问题：本次传输是否有发生超时?如果有是在哪一次传输超时?
设X1，…，Xn为相互独立的随机变量，Sn＝X1＋…＋Xn，则根据列维一林德贝格中心极限定理，当n充分大时，Sn近似服从正态分布，只要X1，…，Xn【】
A、去接听电话B、去医院看病C、去机场接人D、坐飞机去上海D“这就”表示马上的意思，所以女的是要坐飞机去上海看她妈妈，选择D。
Chooseoneappropriatewordfromthefollowingwordbanktofillintheblanknumberedfrom91to105inthepassagebelow.Chan

最新回复(0)

在窗体上画一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click() n=0 For i=0 To 10 X=2*i=1 IfX Mod 3=0 Then n=

二级VB

NCRE全国计算机二级

单击命令按钮执行以下程序，输出结果为()。PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx＝12：y＝32CallProc(x，y)

下面是求最大公约数的函数的首部()。Functionfun(ByValxAsInteger，ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数，下面正确的语句是

某人编写了下面的程序，希望能把Text1文本框中的内容写到Temp．txt文件中PrivateSubCommand1_Click()Open"Temp．txt"ForOutputAs＃2Print"Text1"

在窗体上有一个名称为Label1的标签和一个名称为Timer1的计时器，并编写有如下几个事件过程：PrivateSubForm_Load()Timer1．Enabled＝FalseTimer1．Interval＝____

窗体如图所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击“删除”按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能：PrivateSubCommand1Click()

单击一次命令按钮，下列程序代码的执行结果为()。PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera＝2：b＝3：c＝4

设有变量声明为“DimaDateAsDate”，则能为变量aDate正确赋值的表达方式是()。

关于MDI窗体下列说法正确的是()。

运行下面的程序，单击命令按钮，输出结果为()。FunctionF(aAsInteger)b＝0：Staticcb＝b＋1：c＝c＋1：F＝a＋b＋cEndFunctionPfivateS

以下关于VB的叙述中，错误的是

结核菌素试验阳性提示

女性，50岁，B超查体发现胆囊内多发小结石，一天前吃烤鸭后突发右上腹痛，向右肩部放射伴恶心。此病人最可能的诊断是

下列票据的取得行为中，票据持有人不得享有票据权利的有()。

装卸搬运效率的高低，取决于设备本身的性能和装卸搬运设施的完善状况，这是从()的角度来看的。

张先生，70岁，因脑血栓在家卧床2个月，大小便失禁，不能自行翻身，近日尾骶部皮肤呈紫红色，出现水疱。根据上述材料提供的信息，回答下列问题：应给予哪些护理措施以防止压疮加重?

如下图所示为一个TCP主机中的拥塞窗口的变化过程，这里最大数据段长度为1024字节，请回答如下问题：本次传输是否有发生超时?如果有是在哪一次传输超时?

设X1，…，Xn为相互独立的随机变量，Sn＝X1＋…＋Xn，则根据列维一林德贝格中心极限定理，当n充分大时，Sn近似服从正态分布，只要X1，…，Xn【】

A、去接听电话B、去医院看病C、去机场接人D、坐飞机去上海D“这就”表示马上的意思，所以女的是要坐飞机去上海看她妈妈，选择D。

Chooseoneappropriatewordfromthefollowingwordbanktofillintheblanknumberedfrom91to105inthepassagebelow.Chan