電腦心得及科學隨筆

函式名稱

說明

DateAdd

語法：DateAdd(單位字串,n,日期格式)

功能：傳回指定日期加上 n 個「單位字串」指定的日期或時間單位。

範例：dt = DateAdd(“D”,8,#5/12/2008#)  ‘dt = “#5/20/2008#”

DateDiff

語法：DateDiff(單位字串,日期1,日期2)

功能：計算兩個日期之間的日期或時間差，日期或時間差的單位由「單位字串」決定。

範例：n = DateDiff(“D”,#5/12/2008#,#5/20/2008#)  ‘n = 8

DateSerial

語法：DateSerial(yyyy,mm,dd)

功能：設定指定日期。yyyy 為西元年份，mm 為月份，dd 為日數。

範例：dt = DateSerial(2008,5,12)

DateValue

語法：DateValue(日期字串)

功能：設定指定日期。日期字串的格式為「西元年份/月份/日數」。

範例：dt = DateValue(“2008/5/12”)

Day

語法：Day(日期格式)

功能：取得指定日期的日數，值為 1 到 31 的數值。

範例：n = Day(“#5/12/2008#”)  ‘例如：n = 12

Hour

語法：Hour(日期格式)

功能：取得指定時間的小時數，值為 0 到 23 的數值。

範例：n = Hour(“#09:12:36 AM #”)  ‘例如：n = 9

Minute

語法：Minute(日期格式)

功能：取得指定時間的分鐘數，值為 0 到 59 的數值。

範例：n = Minute(“#09:12:36 AM #”)  ‘例如：n = 12

Month

語法：Month(日期格式)

功能：取得指定日期的月份，值為 1 到 12 的數值。

範例：n = Month(“#5/12/2008#”)  ‘例如：n = 5

MonthName

語法：MonthName(n)

功能：取得 n 的月份名稱。

範例：str1 = MonthName(5)  ‘例如：str1 = 五月

Now

語法：Now

功能：設定或取得目前系統日期及時間。

範例：dt = Now  ‘例如：dt = “#5/12/2008 09:12:36 AM#”

Second

語法：Second(日期格式)

功能：取得指定時間的秒數，值為 0 到 59 的數值。

範例：n = Second(“#09:12:36 AM #”)  ‘例如：n = 36

Timer

語法：Microsoft.VisualBasic.Timer

功能：取得由午夜 0 時 0 分 0 秒開始到目前累計時間的秒數。

範例：n = Microsoft.VisualBasic.Timer  ‘例如：n = 8635

TimeOfDay

語法：TimeOfDay

功能：設定或取得目前系統時間。

範例：dt = TimeOfDay  ‘例如：dt = “#09:12:36 AM#”

Today

語法：Today

功能：設定或取得目前系統日期。

範例：dt = Today  ‘例如：dt = “#5/12/2008#”

WeekDay

語法：WeekDay(日期格式)

功能：取得指定日期是星期幾。若是星期日則傳回 1，星期一則傳回 2，星期二則傳回 3，……，星期六則傳回 7。

範例：n = WeekDay(“#5/12/2008#”)  ‘例如：n = 2

WeekDayName

語法：WeekDayName (n)

功能：取得 n 是星期幾。若是 1 則傳回星期日，2 則傳回星期一，3 則傳回星期二，……，7 則傳回星期六。

範例：str1 = WeekDayName (5)  ‘例如：str1 = 星期四

Year

語法：Year(日期格式)

功能：取得指定日期的西元年份。

範例：n = Year(“#5/12/2008#”)  ‘例如：n = 2008