设计一个计时Access应用程序。该程序界面如图所示,由一个文本框(名为Text1)、一个标签及两个命令按钮(一个标题为开始,命名为Command1;另一个标题为停止,命名为Command2)组成。程序功能为:打开窗体运行后,单击"开始"按钮,则开始计时,

admin2010-03-22  32

问题 设计一个计时Access应用程序。该程序界面如图所示,由一个文本框(名为Text1)、一个标签及两个命令按钮(一个标题为开始,命名为Command1;另一个标题为停止,命名为Command2)组成。程序功能为:打开窗体运行后,单击"开始"按钮,则开始计时,文本框中显示秒数,单击"停止"按钮,则计时停止;双击"停止"按钮,则退出。请填空补充完整。
Dim i
Private Sub Command1_Click()
i=0
Me.TimerInterval=1000
End Sub
Private Sub Command2_Click()
【  】
End Sub
Private Sub Command2_DblClick(Cancel As Integer)
DoCmd.【  】
End SubPrivate Sub Form_Load()
Me.TimerInterval=0
Me! Text1=0
End Sub
Private Sub Form_Timer()
i=i+1
Me! Text1=【  】
End Sub

选项

答案Me.TimerInterval=0 , Close(Quit) , i

解析
转载请注明原文地址:https://kaotiyun.com/show/Cewp777K
0

最新回复(0)