
VB 怎样才能使计时器在显示到一定时间就自动关闭
如提。。谁会写代码。。。。一楼的。。你怎么把主要的没写啊。。。我晕。。我就是想看看那个时间如何指定。。。。汗呢...
如提。。谁会写代码。。。。
一楼的。。你怎么把主要的没写啊。。。我晕。。我就是想看看那个时间如何指定。。。。汗呢 展开
一楼的。。你怎么把主要的没写啊。。。我晕。。我就是想看看那个时间如何指定。。。。汗呢 展开
2个回答
展开全部
做一个1小时30分钟30秒后关闭的例子。。
放三个Label,一个Timer(timer控件间隔设置为1000)
Private Sub Form_Load()
Label1 = "0"
Label2 = "0"
Label3 = "0"
If Label1.caption=1 and Label2.caption=30 and Label3.caption=0
End
End sub
Private Sub Timer1_Timer()
Label3 = Label3 + 1
If Label3 = 60 Then
Label3 = "0"
Label2 = Label2 + 1
If Label2 = 60 Then
Label2 = "0"
Label1 = Label1 + 1
End If
End If
End Sub
放三个Label,一个Timer(timer控件间隔设置为1000)
Private Sub Form_Load()
Label1 = "0"
Label2 = "0"
Label3 = "0"
If Label1.caption=1 and Label2.caption=30 and Label3.caption=0
End
End sub
Private Sub Timer1_Timer()
Label3 = Label3 + 1
If Label3 = 60 Then
Label3 = "0"
Label2 = Label2 + 1
If Label2 = 60 Then
Label2 = "0"
Label1 = Label1 + 1
End If
End If
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询