Question

怎样设置VB的秒表？求代码

谢谢！

Answer 1

Form1属性 Caption 为 秒表
Timer1属性 Interval =1000 ,Enabled = False
Text1属性 text 为空
自己把菜单弄好
代码:
Private Sub mDisp_Click()
Timer1.Enabled = True
End Sub

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

Private Sub Timer1_Timer()
Text1.Text = Time()
End Sub
Private Sub mEnd_Click()
Unload Me
End Sub