首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序代码: Private Sub Command1_Click( ) Dim t As Integer Dim n As Integer,x As Integer t=0
编写如下程序代码: Private Sub Command1_Click( ) Dim t As Integer Dim n As Integer,x As Integer t=0
admin
2020-08-10
19
问题
编写如下程序代码:
Private Sub Command1_Click( )
Dim t As Integer
Dim n As Integer,x As Integer
t=0
For n=1 To 12
x=2 * n-1
If x/3=x 3 Then t=t+1
Next
Print t
End Sub
程序运行后,单击命令按钮Command1,输出结果为( )。
选项
A、5
B、3
C、2
D、4
答案
D
解析
本题考查F0r循环控制结构及if语句的使用,程序开始时,定义3个整型变量t、n和x。For循环结构中循环变量n的初始值为1,终止值为12,条件判断语句if的功能是判断变量x的值是否能被3整除,若x能被3整除,则将变量t加1,循环执行过程中个变量的值如下:
当n=1时,x=2*1-1=1,条件判断语句ifx/3=x\3为假;
当n=2时,x=2*2-1=3,条件判断语句if x/3=x\3为真,执行1=t+1=1;
当n=3时,x=2*3-1=5,条件判断语句if x/3=x\3为假;
当n=4时,x=2*4-1=7,条件判断语句if x/3=x\3为假;
当n=5时,x=2*5-1=9,条件判断语句ifx/3=x\3为真,执行t=t+1=2;
当n=6时,x=2*6-1=11,条件判断语句if x/3=x\3为假;
当n=7时,x=2*7-1=13,条件判断语句if x/3=x\3为假;
当n=8时,x=2*8-1=15,条件判断语句if x/3=x\3为真,执行t=t+1=3;
当n=9时,x=2*9-1=17,条件判断语句if x/3=x\3为假;
当n=10时,x=2*10-1=19,条件判断语句if x/3=x\3为假;
当n=11时,x=2*11-1=21,条件判断语句if x/3=x\3为真,执行t=t+1=4;
当n=12时,x=2*12-1=23,条件判断语句if x/3=x\3为假;
当n=13时,循环结束,最终t的值为4,故D选项正确,本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/qSHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,编写如下事件过程:PrivateSubCommand1_Click()n=0Fori=0To10X=2*i=1IfXMod3=0Thenn=
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click()Dimarr_x(5,5)AsIntegerFori=1To3Forj=2To4arr_x(i,j)=i*jNextj
为了使标签Labell透明且不具有边框,以下正确的属性设置是
在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommand1Click()Dima(10)AsInteger,iAsIntegerRandomizcFori=1To10a(i)=
下列说法中正确的是
将窗体的KeyPreview属性设为Tlue,然后编写如下程序:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivat
下列表达式中不能判断x的是否为偶数的是
在考生文件夹中有一个工程文件vbsj5.vbp(相应的窗体文件为vbsj5.frm)。窗体Form1上有两个名称为Lab1和Lab2的标签,它们的标题分别为“密码”和“允许次数”;一个名称为Cmd1的命令按钮,其标题为“确定”;两个名称分别为Txt1和Tx
以下能对正实数d的第3位小数四舍五入的表达式是
随机试题
该病人首先考虑诊断如果发现髋臼后缘骨块大小1.5cm×1.0cm,处理方法为
一般认为与风湿病发病有关的病原为
ARDS的临床特点
剖宫产术前准备,哪项错误
为了满足建设工程项目施工成本管理的要求,项目成本项编码时应考虑的因素包括( )。
接上题,离婚后,小张可以分得()万元的房屋利益。
用人单位招用劳动者时,应当如实告知劳动者工作内容、工作条件、工作地点、职业危害、安全生产状况、劳动报酬,以及劳动者要求了解的其他情况。()
公平交易权的核心是旅游消费者付出一定旅游费用,获得等值的旅游商品或服务。()
民法宣告失踪的概念和效力。[河北师大2020年研]
Thefirststepinwisecarcareandserviceistobuyacarthatisinperfectcondition.Lookthecarovercarefullytomakesu
最新回复
(
0
)