VB “秒表”窗体中有两个按钮“开始/停止”按钮
发布时间:2020-12-17 07:40:02 所属栏目:百科 来源:网络整理
导读:Dim st,et,pt Private Sub Command1_Click() If Command1.Caption = "开始" Then st = Now Text1 = Format(st,"hh:mm:ss") Command1.Caption = "结束" Else et = Now Text2 = Format(et,"hh:mm:ss") Command1.Caption = "开始" pt = et - st Text3 = Format(
Dim st,et,pt
|