2. 计算机
  3. 窗体上有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中循环显示。

admin2016-06-30  86
问题 窗体上有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全国计算机二级

相关试题推荐
随机试题
最新回复(0)