也许有一天 发表于 2020-12-29 10:59:22

程序中调用form3,form3中的label1内容,在程序未运行完之前不能显示怎么回事,谢谢

Private Sub Form_Load()
Form3.show
..............
(其他程序)
...............

’(**程序运行到此,form3中label1中的时间才显示****)
Form3.Hide
End If

'****form3中的程序****
Private Sub Form_Load()
Timer1.Enabled = True '启动计时du器
d1 = #12:00:00 AM# '初始bai时间为00:00:00
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
d1 = DateAdd("s", 1, d1) '每一秒zhidao加一秒
Label1.Caption = Format(d1, "hh:mm:ss") '用Lable显示时间
End Sub
'****form3中的程序****

杨坚。 发表于 2020-12-29 16:20:43

应该是form3.show放在form_load()里面导致的,放到别的程序段试试,比如commandbutton1_click()

也许有一天 发表于 2020-12-29 17:12:34

杨坚。 发表于 2020-12-29 16:20
应该是form3.show放在form_load()里面导致的,放到别的程序段试试,比如commandbutton1_click()

好像不是这个原因,我放在了其他非form_load()下面也不可以。谢谢你哈。
页: [1]
查看完整版本: 程序中调用form3,form3中的label1内容,在程序未运行完之前不能显示怎么回事,谢谢