VBA-格式化 DateTime 函数

一种函数，可帮助开发人员对有效的日期和时间表达式进行格式化并返回其结果。

语法

FormatDateTime(date,format) 

参数说明

• Date - 必需参数。

• Format - 可选参数。指定要使用的日期或时间格式的值。它可以采用以下值。

  • 0 = vbGeneralDate - 默认

  • 1 = vbLongDate - 返回日期

  • 2 = vbShortDate - 返回日期

  • 3 = vbLongTime - 返回时间

  • 4 = vbShortTime - 返回时间

示例

添加一个按钮并添加以下函数。

Private Sub Constant_demo_Click()
   d = ("2013-08-15 20:25")
   msgbox("Line 1 : " & FormatDateTime(d))
   msgbox("Line 2 : " & FormatDateTime(d,1))
   msgbox("Line 3 : " & FormatDateTime(d,2))
   msgbox("Line 4 : " & FormatDateTime(d,3))
   msgbox("Line 5 : " & FormatDateTime(d,4))
End Sub   

执行上述函数后，将产生以下输出。

Line 1 : 15/08/2013 8:25:00 PM 
Line 2 : Thursday, 15 August 2013
Line 3 : 15/08/2013
Line 4 : 8:25:00 PM
Line 5 : 20:25