首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为List1、含有3个项目的列表框,1个名称为Text1的文本框,以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序,希望程序运行时,每隔1秒,Listl中的3个项目能够依次在Text1中循环显示。
窗体上有1个名称为List1、含有3个项目的列表框,1个名称为Text1的文本框,以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序,希望程序运行时,每隔1秒,Listl中的3个项目能够依次在Text1中循环显示。
admin
2016-06-30
70
问题
窗体上有1个名称为List1、含有3个项目的列表框,1个名称为Text1的文本框,以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序,希望程序运行时,每隔1秒,Listl中的3个项目能够依次在Text1中循环显示。
Private Sub Timerl_Timer()
Dim i As Integer
Textl.Text=Listl.List(i)
i=i+1
If i=List1.ListCount Then
i=0
End If
End Sub
运行程序,发现有错误。以下正确的修改是( )。
选项
A、将if语句的条件修改为i<=List1.ListCount
B、将Interval属性值改为100
C、将语句Text1.Text=Listl.List(i)与i=i+1交换位置
D、将语句Dim i As Integer修改为Static i As Integer
答案
D
解析
计时器的Timer事件,表示每隔Interval指定的时间间隔,就产生一个Timer事件,程序中变量i初始值为0,程序每隔1秒会自动触发一次Timer事件,所以当第二次执行Timer事件时,上一次的i值被重新初始化为0,i值无法保存,所以在定义变量i时,使用Static,将变量i定义为静态局部变量,使变量i能够保存上次执行的结果,故本题D选项正确。其它3项均错误。
转载请注明原文地址:https://kaotiyun.com/show/XeLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下叙述中,错误的是()。
在VisualBasic的立即窗口内输入以下语句:X=97<CR>?Chr$(X)<CR>在窗口中显示的结果是______。
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程:PrivateSubCommand1_Click() CommonDialog1.Flags=vbOFNHideReadOnly
系统符号常量的定义可以通过()获得。
设有如下程序:PrivateSubCommand1_Click() DimcAsInteger,dAsInteger c=4 d=InputBox("请输入一个整数") DoWhiled>0
在E-R图中,用来表示实体的图形是()。
一个工程中含有窗体Form1、Form2和标准模块Modell,如果在Form1中有语句PublicXAsInteger,在Modell中有语句PublicYAsInteger。则以下叙述中正确的是
设x是小于10的非负数。对此陈述,以下正确的VB表达式是
已知二叉树后序遍历序列是CDABE,中序遍历序列是CADEB,它的前序遍历序列是()。
如果进栈序列为e1、e2、e3、e4,则可能的出栈序列是()。
随机试题
价值型股票基金与成长型股票基金相比()。
患者,男性,34岁,右下颌下区无痛性质软肿物发现3个月,表面皮肤正常,口内检查亦未见异常。行下颌下手术时见肿物呈囊性,术中囊壁破裂。流出黏稠而略带黄色蛋清样液体,遂将囊壁及下颌下腺一并摘除,但术后不久囊肿复发。该病的最佳治疗方法是
妇科检查前护理错误的是()。
案情:甲欲购买房屋若干,遂于2005年5月1日到乙房地产公司售楼处了解乙开发建设的A楼盘情况。乙的销售人员称楼盘销售火爆,房屋成交量已达房屋总量的80%以上,如果甲不及时购买,可能再也买不到该楼盘的房屋,即使能买到,也要多支付10%以上的房款。甲领取了楼盘
环境噪声现状评价中,需图示说明的内容有()。
票据基础关系是形成票据关系的原因和前提,但是,票据关系一经形成,就与基础关系相分离。()
下图甲示突触的亚显微结构,a、d分别表示两个神经元的局部。下列与此相关的表述中正确的是()。
对多血质的学生,教师在教育时应着重注意培养其当机立断的性格。()
宋朝初年的最高行政机构是()。
A—TopStoriesB—E-newslettersC—CurrentSpecialD—What’sNewE—Editor’sPicksF—LatestInJobsG—HighlightsH—LetterstoEdito
最新回复
(
0
)