几个窗体要同时共用一个时间变量的问题

[mf424]

显示考试剩余时间用一个时间公共变量times表示,
要在各个窗体上都能显示剩余时间的变化。
我只能解决两个窗体，剩下的就显示不对了。

[cosio]

代码？贴出来了

• 打赏
• 举报

回复 赞

[cso]

模块里面声明全局变量
public a

• 打赏
• 举报

回复 赞

[DieGhost]

全局变量

• 打赏
• 举报

回复 赞

[mf424]

Private Sub Timer1_Timer()
Me.Lbltime.Caption = Me.Lbltime.Caption - 1
If Me.Lbltime.Caption = "5" Then
MsgBox "时间还有5分钟！！！"
End If
If Me.Lbltime.Caption = 0 Then
MsgBox "时间到了！"
Unload Me
End If
times = Me.Lbltime.Caption
End Sub

Private Sub Form_Load()
Timer1.Interval = 3000
Me.Lbltime.Caption = times
End Sub

在主窗体中：
times=90

• 打赏
• 举报

回复 赞

[mf424]

是全局变量，没错，但当在几个窗体中不停的切换时，显示结果就不对了。

• 打赏
• 举报

回复 赞

[lovebeethoven]

是要实时的变化吗？
你可以在每个窗体都加一个TIMER，窗体载入时获得当时的时间，然后自己用TIMER减
或者在主窗体里用TIMER减数，别的窗体里用TIMER刷新数

• 打赏
• 举报

回复 赞

[arsuai]

不要if label, if 那个全局变量!
每个窗体丢一个timer, 主窗体的timer操作全局变量
其他窗体的timer则让label = 全局变量

• 打赏
• 举报

回复 赞

[Andy__Huang]

看你什麼用啦？

時間=now()
時間=time()

你都可以試一下，是不是你所需要的？如果不是這兩個，請你把時間變量放在模塊中，
用public 時間

• 打赏
• 举报

回复 赞