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

admin2015-11-24 21

问题在窗体上画一个名称为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全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

下列程序的功能是：找出给定的12个数中最大的一个数，然后输出这个数以及它在原来12个数中的位置。请填空。OptionBase1PrivateSubForm_Click()Dimxx=Array(57,-9,17,42,-31,46,11,
在窗体上画4个文本框，并用这4个文本框建立一个控件数组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写下列事件过程：PrivateSubCommand1_Click()ForEachTextBoxInText1Text1(i
在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序：OptionBase1PdvateSubCommand1_Click()DimcAsInteger,dAsIntegerd=0c=6X=Array(2,4,6
在窗体上有文本框Text1和命令按钮Command1，并有下列事件过程：PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerFori=0To50i=i+3n=n+1Ifi>1
下列程序的输出图形是()。Fork=0To360cr=Int(160*RnD)ang=-3.1415926/180*kCircle(2000,2000),500,cr,0,angNext
在随机文件中使用用户自定义数据类型时，要注意它的成员的要求，它的成员不能是()。
下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。PrivateSubForm_Click()Diman(10)AsIntegerDimmaxAsIntegerRandomizeFori%=1T
设有命令按钮Command1的单击事件过程，代码如下，请填空。PrivateSubCommand1_Click()Dima(30)AsIntegerFori=1To30a(i)=iNextForEacharrItem__
下列事件过程的功能是：建立一个名为Datal的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为1，2，3，…，90。请在空白处填上合适的代码，将程序补充完整。PrivateTypeAngKA3IntegerSinxAsSing

随机试题

市场营销研究的核心工作是()
自发性气胸的治疗要点是
王某、张某、田某、朱某共同出资180万元，于2012年8月成立绿园商贸中心(普通合伙)。其中王某、张某各出资40万元，田某、朱某各出资50万元；就合伙事务的执行，合伙协议未特别约定。2014年4月，朱某因抄底买房，向刘某借款50万元，约定借期4个月。4
黄某(15周岁)实施盗窃的过程中，被主人发现，为抗拒抓捕，不得不与主人搏斗，搏斗中过失致主人重伤。事后黄某被公安机关抓获。公安机关侦查完毕，人民检察院依法起诉，人民法院依法受理此案。根据此材料回答以下问题。若本案适用简易程序，下列选项正确的是
下列账簿中，可以采用卡片式账簿的是()。
会计职业道德修养的方法有()。
公司发行公司债券所筹集的资金，可以用于()。
(1990年)∫01χdχ＝_______．
在公钥加密模型中，密文取决于()。
TheresultoftheboycottorganizedbyDr.Kingwasthat

最新回复(0)

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

二级VB

NCRE全国计算机二级

下列程序的功能是：找出给定的12个数中最大的一个数，然后输出这个数以及它在原来12个数中的位置。请填空。OptionBase1PrivateSubForm_Click()Dimxx=Array(57,-9,17,42,-31,46,11,

在窗体上画4个文本框，并用这4个文本框建立一个控件数组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写下列事件过程：PrivateSubCommand1_Click()ForEachTextBoxInText1Text1(i

在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序：OptionBase1PdvateSubCommand1_Click()DimcAsInteger,dAsIntegerd=0c=6X=Array(2,4,6

在窗体上有文本框Text1和命令按钮Command1，并有下列事件过程：PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerFori=0To50i=i+3n=n+1Ifi>1

下列程序的输出图形是()。Fork=0To360cr=Int(160*RnD)ang=-3.1415926/180*kCircle(2000,2000),500,cr,0,angNext

在随机文件中使用用户自定义数据类型时，要注意它的成员的要求，它的成员不能是()。

下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。PrivateSubForm_Click()Diman(10)AsIntegerDimmaxAsIntegerRandomizeFori%=1T

设有命令按钮Command1的单击事件过程，代码如下，请填空。PrivateSubCommand1_Click()Dima(30)AsIntegerFori=1To30a(i)=iNextForEacharrItem__

下列事件过程的功能是：建立一个名为Datal的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为1，2，3，…，90。请在空白处填上合适的代码，将程序补充完整。PrivateTypeAngKA3IntegerSinxAsSing

市场营销研究的核心工作是()

自发性气胸的治疗要点是

下列账簿中，可以采用卡片式账簿的是()。

会计职业道德修养的方法有()。

公司发行公司债券所筹集的资金，可以用于()。

(1990年)∫01χdχ＝_______．

在公钥加密模型中，密文取决于()。

TheresultoftheboycottorganizedbyDr.Kingwasthat

下列程序的输出图形是()。Fork=0To360cr=Int(160RnD)ang=-3.1415926/180kCircle(2000,2000),500,cr,0,angNext