首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Text1的文本框和一个名称为Command 1的命令按钮,然后编写如下事件过程: Private Sub Command 1_Click() Dim i As Integer,n As Integer For i=0 To 50
在窗体上画一个名称为Text1的文本框和一个名称为Command 1的命令按钮,然后编写如下事件过程: Private Sub Command 1_Click() Dim i As Integer,n As Integer For i=0 To 50
admin
2015-05-29
52
问题
在窗体上画一个名称为Text1的文本框和一个名称为Command 1的命令按钮,然后编写如下事件过程:
Private Sub Command 1_Click()
Dim i As Integer,n As Integer
For i=0 To 50
i=i+3:n=n+1
Ifi>10 Then Exit For
Next
Text1.Text=Str(n)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是
选项
A、2
B、3
C、4
D、5
答案
B
解析
语句Exit For的作用是退出当前For循环。本题中For循环语句的循环变量i不仅在执行到Next语句时后自动加1,而且在每次执行循环体中的i=i+3语句时,还会加3。当第1次进入循环体时i=0、n=0;当第2次进入循环体时i=4、n=1;当第3次进入循环体时i=8、n=2,此时当执行i=i+3和n=n+1语句后,i=11、n=3,If语句的条件表达式i>10为真,将退出循环,故文本框中显示的值为3。
转载请注明原文地址:https://kaotiyun.com/show/iDQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1Click()Dimarray1(10,10)AsInteger
在菜单编辑器中建立了一个菜单,名为pmenu,用下面的语句可以把它作为弹出式菜单弹出,请填空。Forml.______pmenu
一个工程中包含两个名称分别为Forml、Form2的窗体,一个名称为mdlFunc的标准模块。假定在Forml、Form2和md1Func中分别建立了自定义过程,其定义格式为:Form1中定义的过程:PrivateSubfrmFun
在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1Click()Dimaa=Array(2,4,6,
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程.OptionBase0PrivateSubCommand1_ClickDimcityAsVariantcity=Array(“北京”
在扩展的E-R模型中,子类【】超类所有的联系和属性。
要将窗体Form1标题设为“学习VB”以下能正确实现该功能的语句为
一个工程中含有窗体Form1、Form2和标准模块Modell,如果在Form1中有语句PublicXAsInteger,在Modell中有语句PublicYAsInteger。则以下叙述中正确的是
为了改变计时器控件的时间间隔,应该修改该控件的______属性。
以下有关数组定义的语句序列中,错误的是
随机试题
钢管除锈前表面有潮气,应进行加热,温度为40~60℃。
下列作品,描述悲剧英雄形象的是()
骨盆截骨术截骨平面在
股东大会分为()。
()是让学生走出学校接触社会,了解科学技术的发展,了解社会生活、经济建设实际状况的教育活动。
离一种灾祸越远,我们越觉得其可怕,不敢想象自己一旦身陷其中会怎样。但是,当我们真的身陷其中时,犹如落人台风中心,反倒有了一种意外的平静。我们会发现,人的忍受力和适应力是惊人的。几乎能够在任何境遇中活着,或者死去,而死也不是不能忍受和适应的。从本段
(2011年真题)简述刑事责任的解决方式。
毛泽东在《论十大关系》中,提出我国经济工作要正确处理好的主要关系是()
以下关于堆文件的删除操作叙述错误的是______。A)堆文件的删除操作比较简单,在堆文件头存储它的最后一个磁盘块的地址B)先找到被删除记录所在的磁盘块,然后将该磁盘块读到内存缓冲区C)在缓冲区中删除记录,将缓冲区中修改后的磁盘块内容写回磁盘文件
已知下面的程序段,正确的判断是_________。#defineA3#defineB;(A)((A+1)*A)inta=3;X=3*(A+B(7));
最新回复
(
0
)