首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为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
2020-02-27
26
问题
在窗体上画一个名称为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://kaotiyun.com/show/BxTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为CD1的通用对话框,一个名称为Command1的命令按钮,相应的事件过程如下:PrivateSubCommand1_Click() CD1.Filter="AllFile|*.*|TextFile|*.txt|PPT|*.p
在窗体上画一个名为Command1的命令按钮,然后编写以下程序:PrivateSubCommand1_Click()DimM(10)AsIntegerFork=1To10M(k)=12-kNextkX=8PrintM(2+M(x
数据库应用系统中的核心问题是()。
窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger)SelectCaseIndexCase0Text1(1).FontSize=Tex
窗体上有1个名称为List1的列表框,其中有若干列表项,并有下面程序代码:PriateSubList1_DblClick()ExchangeList1,List1.ListIndexEndSubPrirateSubExchange(So
下列说法中正确的是()。
设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是()。
设循环队列的存储空间为Q(1:m),初始状态为空。现经过一系列正常的入队与退队操作后,front=m,rear=m-1,此后从该循环队列中删除一个元素,则队列中的元素个数为()。
以下说法中正确的是()。
随机试题
户籍管理的实质是()
李煜《虞美人(春花秋月何时了)》中“雕栏玉砌应犹在,只是朱颜改”的言外之意是()
A.心、胃、肺B.呕吐、盗汗、泄泻C.痉、郁冒、大便难D.大汗、峻下、通利小便E.小腹痛不痛、大便通不通、乳汁行不行与饮食多少
国家一级建造师的主要执业范围是( )。
在国民经济核算体系中,有多种不同的GDP核算方法,较常用的方法有( )。
“可燃冰”又称天然气水合物,分布于深海沉积物或陆域的永久冻土中,是一种可再生能源。()
据报道,某卫视的亲子节目核心观众群女性观众占比近2/3。可以想象这样的场景:晚上,年轻的母亲独自带着年幼的孩子,在家看电视上的“爸爸带孩子”,而年轻的爸爸也许还在加班、在应酬,也许只是待在卧室里打游戏、玩电脑——他们的孩子依然延续着没有父亲陪伴的故事。事实
若已经声明了函数原型“voidfun(inta,doubleb=0.0);”,则下列重载函数声明中正确的是()。
当代微型机中所采用的电子元器件是()。
NoEnglishmanbelievesinworkingfrombooklearning.Hesuspectseverythingnew,anddislikesit,unlesshecanbecompelledb
最新回复
(
0
)