VB非常菜的一个问题

Private Sub Timer1_Timer()
Text1.Text = Now
End Sub
可以实时更新.

Private Sub Form_Load()
Text1.Text = Now
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
Text1.Text = Now
End Sub

now()

eg：

Private Sub Form_Load()
Label1.Caption = Now()
End Sub

1. 在窗体上放一个Timer控件.
2. 设置Interval属性, 单位为ms(毫秒), 表示多久重新执行一次Timer事件.当然用来表示时间, 设成999,或是1000都不错!
3. 在Timer事件中加入显示时间的代码.如:
Text1.Text = Now();

在程序的form_load里用用程序改