now()
就可以获取当前的时间。
可以使用
print
now()
进行测试。输出当前时间。
想用文本保存。
那就：
open
app.path
&
"\time.txt"
for
output
as
#1
print
#1,now()
close
Private Sub Form_Load()
Timer1.Interval = 300
End Sub
Private Sub Timer1_Timer()
Text1.Text = Now()
End Sub
新建 工程,1个文本框,1个timer控件
Private Sub Form_Load()
Timer1.Interval = 300
End Sub
Private Sub Timer1_Timer()
Text1 = Time
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024