在窗体上画一个名称为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 37

问题在窗体上画一个名称为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://kaotiyun.com/show/xeTp777K

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

二级VB

NCRE全国计算机二级

相关试题推荐

下列控件属性中，属性值的类型不相同的一项是()。
要建立一个随机文件记录学生的信息，如下定义的学生记录类型，由学号、姓名和5门课程成绩(百分制)组成，下列的定义正确的是()。
在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：DimFlagAsBooleanPrivateSubCommand1_Click()DimintNumAsIntegerintNum＝In
某人编写了下面的程序，希望能把Text1文本框中的内容写到Temp．txt文件中PrivateSubCommand1_Click()Open"Temp．txt"ForOutputAs＃2Print"Text1"
下列程序段的执行结果为()。x＝Int(Rnd＋4)SelectCasexCase5：Print"AClass"Case4：Print"BClass"Case3：Print"CCla
已知数组Dima(1To10)AsInteger，则下面正确调用GetValue函数的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori＝
以下程序在文本框Text1中输入任一字符串，并按相反的次序显示在文本框Text2中，在横线处应填写()。DimNAsString，CAsString，DAsStringN＝Text1．TeXtM＝_____
下列有关过程的叙述中错误的是()。
以下关于通用对话框的叙述中，错误的是
如下关于变体类型变量的叙述中，错误的是

随机试题

下列选项中属于狭义文化产品的有()
Idon’tknowwhenwe______you.
关于金融机构对开发建设项目的审查说法正确的有()。
市场配置资源本身存在着固有的缺陷，即通常所说的市场失灵。下列关于市场失灵的描述错误的是()。
措施费是指为完成设备工程项目，发生于安装前和安装过程中非工程实体项目所支付的费用。设备安装工程措施费主要包括()。
社会主义教育的一个基本特征是()。
一个工地在施工过程中突然地陷，有不明气体喷出，有两名工人晕倒，其他工人也出现头晕、呕吐的现象，如果你是该工地负责人，你该怎么办?
要把握个人在社会中的定位就要正确认识
I______I’mgoingtomakesometea.Wouldyoulikeacup?
A、Toshowhowsimplethemechanicalaidsfordivingcanbe.B、Toprovidereasonsforhischangeablecharacter.C、Toexplorethe

最新回复(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全国计算机二级

下列控件属性中，属性值的类型不相同的一项是()。

要建立一个随机文件记录学生的信息，如下定义的学生记录类型，由学号、姓名和5门课程成绩(百分制)组成，下列的定义正确的是()。

在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：DimFlagAsBooleanPrivateSubCommand1_Click()DimintNumAsIntegerintNum＝In

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

下列程序段的执行结果为()。x＝Int(Rnd＋4)SelectCasexCase5：Print"AClass"Case4：Print"BClass"Case3：Print"CCla

已知数组Dima(1To10)AsInteger，则下面正确调用GetValue函数的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori＝

以下程序在文本框Text1中输入任一字符串，并按相反的次序显示在文本框Text2中，在横线处应填写()。DimNAsString，CAsString，DAsStringN＝Text1．TeXtM＝_____

下列有关过程的叙述中错误的是()。

以下关于通用对话框的叙述中，错误的是

如下关于变体类型变量的叙述中，错误的是

下列选项中属于狭义文化产品的有()

Idon’tknowwhenwe______you.

关于金融机构对开发建设项目的审查说法正确的有()。

市场配置资源本身存在着固有的缺陷，即通常所说的市场失灵。下列关于市场失灵的描述错误的是()。

措施费是指为完成设备工程项目，发生于安装前和安装过程中非工程实体项目所支付的费用。设备安装工程措施费主要包括()。

社会主义教育的一个基本特征是()。

一个工地在施工过程中突然地陷，有不明气体喷出，有两名工人晕倒，其他工人也出现头晕、呕吐的现象，如果你是该工地负责人，你该怎么办?

要把握个人在社会中的定位就要正确认识

I______I’mgoingtomakesometea.Wouldyoulikeacup?

A、Toshowhowsimplethemechanicalaidsfordivingcanbe.B、Toprovidereasonsforhischangeablecharacter.C、Toexplorethe