设计一个计时程序。该程序用户界面如图所示,由一个文本框(Text1)、两个按钮:命令按钮1(Command1)、命令按钮2(Command2)组成。程序运行后,单击开始按钮,则开始计时,文本框中显示秒数,单击停止按钮,则计时停止。单击窗口则退出。请在 【11】 、 【12】 和 【13】 处填入适当的内容,将程序补充完整。
Option Explicit
Dim i
Private Sub Command1_Click()
i=0
Timer1.Interval=1000
Timer1. Enabled=True
End Sub
Private Sub Command2_Click()
Timer1. Enabled=False
End Sub
Private Sub Form_Click()
【11】 Me
End Sub
Private Sub Form_Load()
Timer1. Enabled=False
Text1. Text=0
End Sub
Private Sub Timer1_ 【12】 ()
i=i+1
Text1. Text= 【13】
End Sub
参考答案:[11] Unload
[12] Timer
[13] i
解析: 计时器控件的常用事件是Timer事件,是计时器在间隔了一个Interval时间后所触发的事件。题中[12]处应填事件为Tim cr。i是一个控制时间的变量。文本框中显示的是计时器的计数秒数,故应把控制时间变量的i赋值给文本框的Text属性。[13]处应填变量i。题中要求单击窗口则退出程序,可以用卸载语句Unload Me来实现此功能。