這個函式返回當前的系統日期。
語法
date()
新增一個模組,並新增以下範例程式碼 -
Private Sub Constant_demo_Click() Dim a as Variant a = date() msgbox "The Value of a : " & a End Sub
執行上面範例程式碼,得到以下結果 -