首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim i As Integer, n As Integer For i=0 To
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim i As Integer, n As Integer For i=0 To
admin
2015-08-28
17
问题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim i As Integer, n As Integer
For i=0 To 50
i=i+3
n=n+1
If i>10 Then Exit For
Next
Text1.Text=Str(n)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是( )。
选项
A、2
B、3
C、4
D、5
答案
B
解析
程序中For循环的结束有两种情况,一种是循环完指定的次数,一种是达到一定的条件后直接退出循环。由于在循环体中循环变量i的值被修改:i=i+3,因此,每次循环开始时i的取值为0,4,8,i为8时执行i=i+3=11,n=n+1=3,这时i的值大于10,退出For循环,因此For循环执行了3次,即n的值为3。所以在文本框中会显示3。
转载请注明原文地址:https://jikaoti.com/ti/heJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下事件过程和函数过程:PrivateSubCommand1_Click()Dimnum(1To6)AsSinglenum(1)=103:num(2)=190:num(3)=0hu
下列叙述中正确的是()。
下列程序段的执行结果为______。I=0ForG=10To19Step3I=I+1NextGPrintI
在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程:PrivateSubCommand1_Click()DimbAsIntegerb=b+1EndSub运行程序,三次单
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateSubCommand1_Click()x=-3IfSgn(x)Theny=Sgn(x^2)E
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填上合适的代码,将程序补充完整。PrivateTypeAngKAsIntegerSinxAsSin
软件开发中常采用的结构化生命周期方法,由于其特征而一般称其为______。
在窗体上有一个文本框控件,名称为TextTime,一个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。PrivateSubTimer1_TextTime.Text=TimeEnd
下列关于文件的叙述中,错误的是()。
结构化分析方法是面向()的自顶向下逐步求精进行需求分析的方法。
随机试题
Thefollowingareessentialrequirementsforwhichjobs?EssentialrequirementsAforeignlanguagesBwillingnessto
下列关于脓胸1期的说法,正确的是()
建筑物折旧包括()方面的内容。
################################################################################################################################
如图7-71所示,电路具有()。
碾压混凝土坝是采用碾压土石坝的施工方法,使用干贫混凝土修建的混凝土坝,是混凝土坝施工的一种新技术。某拦河大坝采用该项施工技术。承包商在编制施工组织设计时,根据有关资料,结合现场地形地貌等条件,重点对下列几个方面进行分析和考虑:(1)料场的选择与布
椰枣干
“绿色植物的生活需要水”一课中,教师通过展示两盆植物,让学生进行观察和对比,并总结出绿色植物的生活需要水,从而引入教学内容。该教师使用的导入方式为()。
引文查找法的缺点是()。
在2号工作区打开数据表xs.dbf,并设置别名为student,应输入的命令是:USExs.dbfIN2【】student
最新回复
(
0
)