vb.net计时5秒的简单介绍

vb如何设计一个,运行后窗体5秒自动关闭(退出),请详细说明代码和含义。谢谢!

好久没用vb了,不过记得好像有个时钟控件吧,用那个作为倒计时,5秒就是5000毫秒,然后激活事件中写窗体关闭,就ok了。

成都创新互联于2013年开始,先为古浪等服务建站,古浪等地企业,进行企业商务咨询服务。为古浪企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

VB.NET 计时器的问题

不对。步骤如下:

添加一个label标签名字label1 用来显示时间

再添加一个timer控件 名字timer1 interval属性=1000 用来计时

窗体添加代码

Dim t As Date '用来记录时间

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As _

System.EventArgs) Handles Timer1.Tick

t = t.AddSeconds(1)

Label1.Text = "登录时间:" t.TimeOfDay.ToString

End Sub

VB.NET写一个按钮倒数5秒后自动执行button事件

Dim so As Integer

Dim A As Integer

Private Sub Form_Load()

Timer1.Enabled = True

Timer1.Interval = 1000

A = 1

End Sub

Private Sub Timer1_Timer()

so = so + 1

If A = 0 Then

so = 0

Me.Caption = "正常运行"

Exit Sub

Else

Me.Caption = so

If so = 6 Then

so = 0

' 触发button事件

End If

End If

End Sub

如何用VB程序做计时器?

3个标签,2个按钮,1个计时器控件

Private Sub Command1_Click() '开始/暂停

If Timer1.Enabled = True Then

Timer1.Enabled = False

Else

Timer1.Enabled = True

End If

End Sub

Private Sub Command2_Click() '停止清0

Label1 = "0"

Label2 = "0"

Label3 = "0"

Timer1.Enabled = False

End Sub

Private Sub Form_Load() '初始设置

Label3 = "0"

Label2 = "0"

Label1 = "0"

Timer1.Interval = 1000

Timer1.Enabled = False

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

【vb.net】怎么点击一个按钮执行一个代码,5秒后执行另一个代码

button里执行

sleep 5000 '等5秒

call xxxx '另外的过程代码

即可。

VB.NET,如何用TIMER控件计时

这种功能用不到TIMER,TIMER控件用在这种地方也不适合。(假如你所统计的时间很短,在几分中内话,可以使用,假如你统计的时间很长:几小时、几天几夜,建议改用以下方式):

在你需要开始计时的地方加入一个记录当前时间,在你想结束的地方也得到一个当前时间。然后将两个时间相减。

希望以上思路可以帮到你。


当前名称:vb.net计时5秒的简单介绍
标题URL:http://cdiso.cn/article/hejpii.html

其他资讯