关于vba处理时间的问题

来源：百度知道 编辑：UC知道 时间：2024/06/24 18:28:45
我想插入一个用户窗体，在这个窗体上显示当前日期及时间（包括时、分、秒），我现在的做法是插入一个文字框TextBox1，然后写代码TextBox1.Text = Now，但是秒钟不会自动更新，需要我每单击一次它才会更新一次，不知该如何处理，请高手指点。。。感谢！！！（不知是不是跟runtime有关）
请问 23362215 记时器控件在哪里填加

1楼和2楼说的完全是在害楼主哦，如果像那样做的话，程序将会陷入死循环，永远无法退出。楼主可以试一试下面的方法：
在你的用户窗体上加一个文字框Text1，然后再添加一个计时器Timer1,计时器的属性设置为：Enable=Flase;Interval=600，其它的不变。再把下面的代码添加到代码窗口就可以达到你的要求了。

Private Sub Form_Load()
Timer1.Enabled = True
End Sub

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

do
textbox1.text=now
loop

do
textbox1.text=now
loop 这样就可以了