钣金喷漆要学多长时间:怎么在窗体上制作一个动态秒表,其中有两个命令按钮控制开始结束?
来源:百度文库 编辑:杭州交通信息网 时间:2024/04/30 16:04:06
只写程序代码既可
快点回答
我会追加的
快点回答
我会追加的
Private Sub Command1_Click() '开始按钮
Timer1.Enabled = True
End Sub
Private Sub Command2_Click() '结束按钮
Timer1.Enabled = False
End Sub
Private Sub Timer1_Timer() '定时器
Text1.Text = Val(Text1.Text) + 1
End Sub
根据Timer1.Interval属性的值调整延时长短,可取1000试试,Timer1.Enabled属性原始值调整成False