
在VB中,使用label控件建立一个自动更新的时间显示,代码是什么?
展开全部
Option Explicit
Private n As Long
Private Sub Form_Load()
n = 0
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
n = n + 1
Lable1.Text = n
End Sub
追问
好吧,这是一个计时的。我要的是显示系统时间的。已经出来了,谢谢你的思路。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询