FormatDateTime

一个Function，它可以帮助开发人员格式化并返回有效的日期和时间表达式。

语法 (Syntax)

FormatDateTime(date,format) 

参数描述 (Parameter Description)

• Date - 必需参数。

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

  • 0 = vbGeneralDate - 默认

  • 1 = vbLongDate - 返回日期

  • 2 = vbShortDate - 返回日期

  • 3 = vbLongTime - 返回时间

  • 4 = vbShortTime - 返回时间

例子 (Example)

添加按钮并添加以下功能。

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