Question

在VB中,编写计时器控件代码

请问高手这个怎样编

Answer 1

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Label1.Caption = Label1.Caption + 1
End Sub
做下修改重发，嘿嘿~~

Answer 2

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
L1.Caption = Val(L1.Caption) + 1
End Sub
就这么简单

Answer 3

private sub command1_click()
timer1.enable=true
end sub

private sub timer1_timer()
L1.caption=cint(L1.caption)+1
end sub