我们在编写VB程序有时候会想要获取系统的当前时间,并且将时间输出为想要的格式,那么我们该使用哪一个函数,又该如何操作,下面用实例来说明。
用到的函数:
Date函数:返回系统的日期
Now函数:返回系统的日期和时间
Format函数:根据格式表达式来格式化数据
实例:
Private Sub Form_Load() '设置同步时间显示 Timer1.Interval = 1000 Timer1.Enabled = True End Sub Private Sub Timer1_Timer() Label2.Caption = Format(Now,"hh:mm:ss") '获取当前时间 Label4.Caption = Format(Now,"yyyy-mm-dd") '获取当前日期 Label6.Caption = Format(Now,"yyyy-mm-dd hh:mm:ss") '日期和时间 End Sub