在考生文件夹下有一个工程文件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 单击
【答案解析】