要顯示中文日期,可以使用FormatDateTime函數的參數來指定日期的顯示格式。以下是一個示例代碼,演示如何使用FormatDateTime函數顯示中文日期:
Dim currentDate
currentDate = Now
' 設置日期格式為中文日期
Dim chineseDateFormat
chineseDateFormat = "yyyy年MM月dd日"
' 顯示中文日期
MsgBox FormatDateTime(currentDate, vbLongDate) & vbCrLf & FormatDateTime(currentDate, vbLongTime) & vbCrLf & FormatDateTime(currentDate, chineseDateFormat)
在上面的代碼中,首先獲取當前日期和時間,然后指定日期格式為中文日期(“yyyy年MM月dd日”),最后使用FormatDateTime函數將日期按照中文日期格式顯示出來。通過這種方式,可以輕松將日期顯示為中文格式。