首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() s=0 For i=1 To 15 x=2 * i-1 If x Mod
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() s=0 For i=1 To 15 x=2 * i-1 If x Mod
admin
2018-12-20
42
问题
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:
Private Sub Command1_Click()
s=0
For i=1 To 15
x=2 * i-1
If x Mod 3=0 Then s=s+1
Next i
Label1.Caption=s
End Sub
程序运行后,单击命令按钮,则标签中显示的内容是( )。
选项
A、1
B、5
C、27
D、45
答案
B
解析
s变量用来计数,如果x Mod 3=0即如果能被3整除则计数增加1。程序中x的取值为1、3、5、7、9、11、13、15、17、19、21、23、25、27、29,其中是3的整数倍的数有3、9、15、21、27共5个,因此s的值为5。
转载请注明原文地址:https://kaotiyun.com/show/oVFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有以下程序:PrivateSubForm_Click() x=50 Fori=1To4 y=InputBox("请输入一个整数") y=Val(y) IfyMod5=0Then a=a+y
标准模块中有如下程序代码:PublicxAsInteger,yAsIntegerSubvar_pub() x=10∶y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:PrivateSubCommand1_Clic
窗体上有一个名称为Command1的命令按钮,有程序如下:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger’第1个ForFori=1To1
窗体上有一个名称为Command1的命令按钮,编写如下事件过程:PrivateSubCommand1_Click()i=0DoWhilei<6Forj=1Toin
设程序中有以下语句:MsgBox"Visual",,"Basic","等级考试",2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
编写如下程序:PrivateSubCommand1_Click()DimxAsString,yAsStringx=Right("abcd",2)y=Mid("dcba",2,3)Ifx>
以下不属于VB控件的是
软件需求规格说明书的作用不包括
下面不属于软件设计阶段任务的是
随机试题
简述阿尔波特的价值观分类。
肺总容量等于()
患者,男,70岁。咳嗽、咳痰,伴痰中带血3个月。胸片提示右肺门类圆形阴影,边缘毛躁,有分叶。提问l:该患者最可能的诊断是A.肺结核B.肺脓肿C.肺不张D.肺癌E.肺气肿F.肺炎
施工产品不像一般的工业产品那样先生产后交易,而是先交易后生产,即由建设单位事先选定施工单位签订施工承包合同,然后在施工现场根据合同约定的条件进行生产。这体现了()。
输入的动植物、动植物产品和其他检疫物运达口岸时,检疫人员可以到运输工具上和货场实施现场检疫,核对货、证是否相符,并可以按照规定采取样品。( )
某企业需借入资金600000元,贷款银行要求将贷款数额的20%作为补偿性余额,故企业需向银行申请的贷款数额为()元。
从装满100克浓度为80%的盐水杯中倒出40克盐水,再倒入清水将杯倒满,这样反复三次后,杯中盐水的浓度是多少?()
讯通驾校希望减少中老年学员的数量。因为一般而言,中老年人的培训难度较大。但统计数据表明,该校中老年学员的比例在逐渐增加。很显然,讯通驾校的上述希望落空了。以下哪项如果为真,最能削弱上述论证?
Usingapublictelephonemaywellbeoneof【C1】______oflife,demandingpatience,determinationand【C2】______,togetheronoccas
Musiccomesinmanyforms;mostcountrieshaveastyleoftheirown.【C1】theturnofthelastcenturywhenjazz(爵士乐)wasborn,A
最新回复
(
0
)