查人人中国名人网人鱼的旋律米凯尔:怎样用VB编写简易倒计时器
来源：百度文库 编辑：查人人中国名人网 时间：2024/04/29 18:07:19
我需要源码哦。。 不能出现负数 很简单的就行 就三个按键 一个开始 一个暂停 一个结束！
进行时 开始按键无效 停止计时 暂停按键无效 最好能判断输入的是否数字的功能
VB我是真的不懂啊 再简单的我也不会啊。 。 所以才来求救。。。。
进行时 开始按键无效 停止计时 暂停按键无效 最好能判断输入的是否数字的功能
VB我是真的不懂啊 再简单的我也不会啊。 。 所以才来求救。。。。
Dim run As Boolean
Dim a As Integer
Private Sub Command1_Click()
Command1.Enabled = False
Command2.Enabled = True
a = Val(InputBox("pleas press number"))
run = True
End Sub
Private Sub Command2_Click()
Command1.Enabled = True
Command2.Enabled = f
End Sub
Private Sub Command3_Click()
End
End Sub
Private Sub Form_Load()
Command2.Enabled = f
End Sub
Private Sub Timer1_Timer()
If run Then
a = a - 1
Label1.Caption = a
If a <= 0 Then MsgBox "end"
End If
End Sub
这是基本的计时器操作啊
Timer控键