2. 计算机
  3. 在考生文件夹下有一个工程文件sj5．vbp，窗体上有两个文本框，名称分别为Textl和Text2，分别用来表示两个计数器；还有两个计时器Timerl和Timer2。Timerl用于变换Textl的计数；Timer2用于控制Text2的计数。运行时，单击“开

在考生文件夹下有一个工程文件sj5．vbp，窗体上有两个文本框，名称分别为Textl和Text2，分别用来表示两个计数器；还有两个计时器Timerl和Timer2。Timerl用于变换Textl的计数；Timer2用于控制Text2的计数。运行时，单击“开

admin2009-08-26  61
问题 在考生文件夹下有一个工程文件sj5．vbp，窗体上有两个文本框，名称分别为Textl和Text2，分别用来表示两个计数器；还有两个计时器Timerl和Timer2。Timerl用于变换Textl的计数；Timer2用于控制Text2的计数。运行时，单击“开始”按钮后，Textl每当到5的倍数则停止，Text2开始计数，当Text2计数到6的倍数则Textl开始计数，交替进行。程序运行时的窗体界面如图49—5所示。

    注意：在窗体中已经给出了全部控件和程序，但程序不完整，要求阅读程序并去掉程序中的注释符“’”，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。最后把修改后的文件以原文件名存盘。
选项
答案 本题主要考查考生分析和阅读程序的能力。计时器在设计时是可见的，但运行时不可见，它是否启用取决于其Enabled属性值，值为True时启用，为False时不启用。启用后间隔多长时间触发一次其Timer事件是由其Interval属性值决定的，IntervaI属性的单位为毫秒，缺省值为0，此时计时器也不启用。判断一个数是否可以被另一个数整除，要用Mod运算符，如果计算结果为0，则表示可以整除，否则不能整除。补充后的代码如下： Private Sub Commandl_Click() Timerl．Interval=1000’按开始键启动Textl计数 End Sub Private Sub Timerl Tliner() Textl．Text=Textl．Text+1 ’每个一个间隔Textl加1 If Textl．Text Mod 5=0 Then’当Textl的数是5的倍数 Timerl．Interval=0 ’停止Textl计数 Timer2．Interval=1000 ’启动Text2计数 End If End Sub Private Sub Timer2_Timer() Text2．Text=Text2．Text+1’每个一个间隔Text2加1 If Text2．Text Mod 6=0 Then’当Text2的数是6的倍数 Timer2．Interval=0 ’停止Text2计数 Timerl．Interval=1000馆动Textl计数 End If End Sub 单击[*]按钮运行程序，并按要求保存。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/Cc1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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