![[填空题] 设计一个计时程序。该程序用户界面如图所示，由一个文本框(Text1)、两个按钮：命令按钮1(Command1)、命令按钮2(Command2)组成。程序运行后，单击开始按钮，则开始计时，文](http://www.mshxw.com/aiimages/31/256051.png "[填空题] 设计一个计时程序。该程序用户界面如图所示，由一个文本框(Text1)、两个按钮：命令按钮1(Command1)、命令按钮2(Command2)组成。程序运行后，单击开始按钮，则开始计时，文")
[填空题] 设计一个计时程序。该程序用户界面如图所示，由一个文本框(Text1)、两个按钮：命令按钮1(Command1)、命令按钮2(Command2)组成。程序运行后，单击开始按钮，则开始计时，文本框中显示秒数，单击停止按钮，则计时停止。单击窗口则退出。请在 【11】 、 【12】 和 【13】 处填入适当的内容，将程序补充完整。
Option Explicit
Dim i
Private Sub Command1_Click()
i＝0
Timer1.Interval=1000
![[填空题] 设计一个计时程序。该程序用户界面如图所示，由一个文本框(Text1)、两个按钮：命令按钮1(Command1)、命令按钮2(Command2)组成。程序运行后，单击开始按钮，则开始计时，文](/uploadfile/member/20180926/1537964655.jpg "[填空题] 设计一个计时程序。该程序用户界面如图所示，由一个文本框(Text1)、两个按钮：命令按钮1(Command1)、命令按钮2(Command2)组成。程序运行后，单击开始按钮，则开始计时，文")
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来实现此功能。
