情侣头像污的欧美风:VB中如何使一个文本框显示当前时间半个小时后的时间
来源:百度文库 编辑:查人人中国名人网 时间:2024/05/11 20:49:43
Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Text1.Text = Time
Text2.Text = DateAdd("n", 30, Time)
End Sub
加入一个计时器,代码如上,text1显示当前时间,text2显示30分钟后时间。
正确