level 1
2652152
楼主
下面是
正确的
代码 可以在标签上显示实时的 秒钟
Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Enabled = True
Timer1.Interval = 1000 End Sub Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Dim s As Integer
s = Now.Second
Label1.Text = s
End Sub
End Class
请问 为什么这个代码可以不停的显示秒钟
而不是在获取当前秒钟后就停止了的。。
2012年12月02日 13点12分
1
正确的
代码 可以在标签上显示实时的 秒钟
Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Enabled = True
Timer1.Interval = 1000 End Sub Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Dim s As Integer
s = Now.Second
Label1.Text = s
End Sub
End Class
请问 为什么这个代码可以不停的显示秒钟
而不是在获取当前秒钟后就停止了的。。
