ถามไว้ที่ http://www.utteraccess.com/forums/showflat.php?Cat=&Board=access_2000&Number=153120&page=0&view=collapsed&sb=5&o=7&fpart=1&vc=1&PHPSESSID= 
 
เขาต้องการให้มีชื่อวัน Monday, Tuesday, ..., Sunday ให้เองโดยอัตโนมัติ 
 
ผมลองทำโค้ดง่ายๆ ดังนี้ 
 
ใน Access97 
 
Sub GetWeekDays() 
Dim I As Integer 
For I = 1 To 7 
    Debug.Print Format(WeekDay(I, vbSaturday), "วววว") 
Next I 
End Sub 
 
จะได้ 
 
จันทร์ 
อังคาร 
พุธ 
พฤหัสบดี 
ศุกร์ 
เสาร์ 
อาทิตย์ 
 
ส่วนใน Access 2000 ขึ้นไป ให้ลองเปลี่ยนเป็น 
 
Sub GetWeekDays() 
Dim I As Integer 
For I = 1 To 7 
    Debug.Print Format(Weekday(I, vbSaturday), "dddd") 
Next I 
End Sub 
 
*** Edited by Supap Chaiya *** 5/15/2003 12:31:38 AM