vb 编写程序题

来源：百度知道 编辑：UC知道 时间：2024/05/03 22:48:38
编写程序，实现按秒计时，要求具有“开始计时” 和“停止计时”的功能
。比如，执行开始计时功能后，经过两分钟，用户执行停止功能时，屏幕显示120秒。

请高手帮忙编写这个程序呀 急！急！急！
能把所有的程序，写出来吗？

commnad1=开始,command2=结束,timer.interval=1000,timer1.enabeld=false,label1.caption=0

Private Sub Command1_Click()
Label1.Caption = 0
Timer1.Enabled = True

End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Timer1_Timer()
Label1.Caption = Label1.Caption + 1
If Label1.Caption = 120 Then Timer1.Enabled = False
End Sub

一个标签，两个按钮，一个时间控件

时间控件周期为1秒。
定义一个数值变量

开始按钮：时间控件启动，数值变量清零。
timer事件，数值变量 = 数值变量 + 1。
结束按钮：时间控件关闭，标签.text = 数值变量。

用timer控件的功能，用按键控制timer事件的开始和停止
timer事件里面设置一个变量n，n=n+1
在停止按键的事件里面显示n就可以了

设置command1的caption为开始,command2的caption为停止,在timer1的属性中设置timer1.enabeld为false,label1的caption为0
Private Sub Command1_Click()
Label1.Caption = 0
Timer1.Enabled = True
End Sub

Private Sub Command2_Click()
Timer1.Enabled = False
End Sub

Private Sub Timer1_Timer()
Label1.Caption = Label1.Caption