vb中怎样才能使一个文本框里的内容随时间每隔一秒更新替换一次

2025-03-24 07:10:46

推荐回答（2个）

回答1：

Private Sub Form_Load()
Text1.Locked = True
Text1.Text = 60
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
If Val(Text1.Text) - 1 <= 0 Then
Text1.Text = 60
Else
Text1.Text = Val(Text1.Text) - 1
End If
End Sub

回答2：

在文本框的CHANGE事件中，写入注射器的刷新方法

最新问答

弱视可以用激光手术治好吗？

速8精选酒店加盟前景好吗？

女朋友给我说你是第一个教会我爱和被爱的男人！我该如何回复，略带幽默的

眼睛看不见的叫瞎子，耳朵听不见的叫聋子，嘴巴不能说话的叫哑巴

我国骨瓷套装餐具哪个是最好的？松发瓷器怎么样？

如何解决win10系统浏览器无法上网问题

生态板招商好项目有人了解过么？

两个相爱的人在一起你会不会因为家人反对而分开？

2012款奇瑞旗云2质量怎么样

喝酒后就脸红，皮肤痒，是怎么回事，怎么解决