【VB】获取系统当前时间并格式化输出

我们在编写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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!