vb问本框中显示的是当前的时间，而且每一秒文本框中所显示的时间都会随时间的变化而改变

2024-12-13 23:06:08

推荐回答（5个）

回答1：

放一定时器控件

Private Sub Timer1_Timer()

Timer1.Enabled = True

Timer1.Interval = 100

Text1.Text = Time()

End Sub

回答2：

添加一个定时器timer1
把属性Interval的值设置为1000
添加以下代码
Private Sub Timer1_Timer()
Text1.Text = Now
End Sub

回答3：

添加一个timer控件，一个text控件
Private Sub Form_Load()
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
Text1.text = Time$
End Sub

回答4：

用到Timer控件 .Interval设置为1000
Private Sub Form_Load()
Timer1.Interval = 1000
End Sub

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

回答5：

'''''''''''timer控件
Private Sub Form_Load()
Timer1.Interval = 10
End Sub
'''''''''text控件
Private Sub Timer1_Timer()
Text1.text = Time
End Sub