2014-01-07 187 views
1

當有兩個文本框時,我有一個訪問表單。 第一個叫txtDateBox,它允許用戶選擇一個日期。 第二個名爲DayBox的顯示天數名稱。 我在DayBox中有一個控制源來獲取當天的名稱。當我從日期框中選擇星期日時,文本框日期不顯示星期幾名稱

=WeekdayName(Weekday([txtDateBox])-1) 

這工作正常,直到我選擇一個星期日期。 它會顯示一個#Func!消息在文本框中,並且不允許我編譯自動報告。

回答

2

問題是因爲WeekdayName(0)觸發錯誤#5,「無效的過程調用或參數。」

使用DateAdd避免錯誤之前,從txtDateBox減去有一天,你把它給Weekday。這裏是一個即時窗口會話,向你展示我的意思:

txtDateBox = #2014-1-5# 
? Format(txtDateBox, "ddd, mmm d, yyyy") 
Sun, Jan 5, 2014 
? DateAdd("d", -1, txtDateBox) 
1/4/2014 
? Weekday(DateAdd("d", -1, txtDateBox)) 
7 
? WeekdayName(Weekday(DateAdd("d", -1, txtDateBox))) 
Saturday 
相關問題