2. 计算机
  3. 窗体上有1个名称为List1、含有3个项目的列表框，1个名称为Text1的文本框，以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序，希望程序运行时，每隔1秒， List1中的3个项目能够依次在Text1中循环显示。

窗体上有1个名称为List1、含有3个项目的列表框，1个名称为Text1的文本框，以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序，希望程序运行时，每隔1秒， List1中的3个项目能够依次在Text1中循环显示。

admin2018-10-18  61
问题 窗体上有1个名称为List1、含有3个项目的列表框，1个名称为Text1的文本框，以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序，希望程序运行时，每隔1秒， List1中的3个项目能够依次在Text1中循环显示。
   Private Sub Timer1_Timer()
   Dim i As Integer
   Text1.Text = List1.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 = List1.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/CDFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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