หาวันของสัปดาห์
กระทู้เก่าบอร์ด อ.Yeadram

 2,062   5
URL.หัวข้อ / URL
หาวันของสัปดาห์

คือผมอยากหาวันต้นปีกับท้ายปีของปีนั้นๆตรงกับวันอะไร โดยที่ป้อน ว.ด.ป.เข้าไป รบกวนผู้รู้ด้วยครับ

5 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R20428
ใช้ฟังค์ชั่น Weekday ได้ครับ ผลลัพธ์ที่ได้เป็นตัวเลข เลข 1 = วันอาทิตย์, เลข 2 = วันจันทร์ ..... เลข 7 = วันเสาร์ เช่น WD : Weekday([วันที่อยากรู้])

หรือเขียน IIF ก็ได้ครับ เช่น
WD: IIf(Weekday([Bill_Date])=1,"วันอาทิตย์",
IIf(Weekday([Bill_Date])=2,"วันจันทร์",
IIf(Weekday([Bill_Date])=3,"วันอังคาร",
IIf(Weekday([Bill_Date])=4,"วันพุธ",
IIf(Weekday([Bill_Date])=5,"วันพฤหัส",
IIf(Weekday([Bill_Date])=6,"วันศุกร์",
IIf(Weekday([Bill_Date])=7,"วันเสาร์")))))))

2 @R20429
ลองใช้ function Choose() ดูครับ
เช่น Choose(weekday([Bill_date],"วันอาทิตย์","วันจันทร์","วันอังคาร","วันพุธ","วันพฤหัสบดี","วันศุกร์","วันเสาร์"))
3 @R20430
คือว่าระบุ ว.ด.ป.ใดๆก็ได้เช่น 15 May 2010 แล้วจะหาว่าวันต้นปีและปลายปี ของวันที่ 15 May 2010 เป็นวันอะไรและถ้าเราเปลี่ยนเป็นวันที่ 26 July 2020 แล้ววันต้นปีกับปลายปีเป็นวันอะไรของสัปดาห์แบบนี้ครับ
4 @R20431
คุณใช่คนเดียวกับกระทู้คำถามนี้ป่าวครับ ถ้าใช่ผมจะได้ตอบที่นี่ที่เดียวเลยนะครับ
ถ้าเราคีย์ วัน-เดือน-ปี ลงใน Form แล้วอยากรู้ว่า
    - ถ้าปีหน้า (วัน-เดือน ข้างต้นแล้ว) จะเป็นวันอะไร? Monday or Tuesday.....
    - ว.ด.ป.ข้างต้น เป็นสัปดาห์ที่เท่าไรของปี
    - ว.ด.ป.ข้างต้น เป็น quater ที่เท่าไรของปี
    - วันแรกของปีข้างต้นเป็นวันอะไร
    - วันสุดท้ายของปีข้างต้นเป็นวันอะไร

* ก่อนอื่นทำความเข้าใจเรื่องวันที่ใน Windows ก่อน คือหากคุณกำหนดใน Windows เป็น ค.ศ. หรือ พ.ศ. ค่าวัน จันทร์ อังคาร จะเป็นภาษาไหนก็อยู่ที่ Windows เช่นกัน ทุกอย่างที่กำหนดใน Windows จะมีผลกับ MS Access
ในที่นี่ผมใช้เป็น ค.ศ. นะครับ

- ถ้าปีหน้า (วัน-เดือน ข้างต้นแล้ว) จะเป็นวันอะไร? Monday or Tuesday.....     
: Format(DateAdd("yyyy",1,#4/5/2015#),"dddd")
= พุธ

- ว.ด.ป.ข้างต้น เป็นสัปดาห์ที่เท่าไรของปี
: DatePart("ww",#4/5/2015#)
= 19

- ว.ด.ป.ข้างต้น เป็น quater ที่เท่าไรของปี
: DatePart("q",#4/5/2015#)
= 2

- วันแรกของปีข้างต้นเป็นวันอะไร
: Format(DateValue("1/1/" & Year(#4/5/2015#)),"dddd")
ถ้า Windows เป็น พ.ศ. ต้องบวก 543
: Format(DateValue("1/1/" & Year(#4/5/2015#)+543),"dddd")
= พฤหัสบดี

- วันสุดท้ายของปีข้างต้นเป็นวันอะไร
: Format(DateValue("12/31/" & Year(#4/5/2015#)),"dddd")
ถ้า Windows เป็น พ.ศ. ต้องบวก 543
: Format(DateValue("12/31/" & Year(#4/5/2015#)+543),"dddd")
= พฤหัสบดี

ปล. สามารถเรียนรู้ได้ที่นี่นะครับเรื่องของ Date Time
คลิ๊กที่นี่
5 @R20447
ได้แล้วครับ ขอบคุณครับ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3297s