กระทู้เก่าบอร์ด อ.Yeadram
2,050 9
URL.หัวข้อ /
URL
date ไทย
จะเขียน รูปแบบนี้ยังไงครับใน Report วันที่ 25 มีนาคม 2554 textbox นะครับ
ตอนนี้ใช้ สูตร =date() อยู่
ตอนนี้ใช้ สูตร =date() อยู่
9 Reply in this Topic. Dispaly 1 pages and you are on page number 1
1 @R08666
Format(Date(),"Longdate")
2 @R08667
คุณ UN ครับ Lo025ate ไมขึ้นแบบนี้ครับ
3 @R08669
คำว่า long date มีเคาะด้วยครับ
Format(Date(),"Long date")
คุณ Un คงพิมพ์ตกครับ
Format(Date(),"Long date")
คุณ Un คงพิมพ์ตกครับ
4 @R08671
อ้อได้แล้วครับ แต่ทำไม ปี มันยังเป็น 2011 ไม่ใช่ 2554 ครับ
5 @R08673
คุณ U Win อาจจะตั้งค่า ปีในเครื่องเป็น ปี ค.ศ. หรือ เปล่า ลองเปลียนเป็น ปี พ.ศ. ดู ครับ เนื่องจากฟังก์ชั่น Long date จะคืนค่าตาม Format ตามเครื่องของเราครับ
6 @R08674
มันขึ้นอยู่กับการตั้งวันที่ของวินโดวด้วยครับ เอาแบบนี้ดีกว่า
Coppy ฟังชันนี้ไปไว้ในโมดูล
Function MonthName(MonthNo)
Select Case MonthNo
Case 1
MonthName = "มกราคม"
Case 2
MonthName = "กุมภาพันธ์"
Case 3
MonthName = "มีนาคม"
Case 4
MonthName = "เมษายน"
Case 5
MonthName = "พฤษภาคม"
Case 6
MonthName = "มิถุนายน"
Case 7
MonthName = "กรกฎาคม"
Case 8
MonthName = "สิงหาคม"
Case 9
MonthName = "กันยายน"
Case 10
MonthName = "ตุลาคม"
Case 11
MonthName = "พฤศจิกายน"
Case 12
MonthName = "ธันวาคม"
Case Else
MonthName = ""
End Select
End Function
แล้วเวลาใช้ก็ Day(Date())&" "&MonthName(month(Date()))&" "&Year(Date())+543
อันนี้ได้หมด
Coppy ฟังชันนี้ไปไว้ในโมดูล
Function MonthName(MonthNo)
Select Case MonthNo
Case 1
MonthName = "มกราคม"
Case 2
MonthName = "กุมภาพันธ์"
Case 3
MonthName = "มีนาคม"
Case 4
MonthName = "เมษายน"
Case 5
MonthName = "พฤษภาคม"
Case 6
MonthName = "มิถุนายน"
Case 7
MonthName = "กรกฎาคม"
Case 8
MonthName = "สิงหาคม"
Case 9
MonthName = "กันยายน"
Case 10
MonthName = "ตุลาคม"
Case 11
MonthName = "พฤศจิกายน"
Case 12
MonthName = "ธันวาคม"
Case Else
MonthName = ""
End Select
End Function
แล้วเวลาใช้ก็ Day(Date())&" "&MonthName(month(Date()))&" "&Year(Date())+543
อันนี้ได้หมด
7 @R08676
ขอบคุณ Un ด้วยขอรับทำได้แล้ว ต้องใช้โมดูลนี้เอง
8 @R08677
ไม่ต้องใช้ Module ก็ได้ ครับ ใน textbox ให้เขียน ฟังก์ชั่นดังนี้ ครับ
=Left(Format(Date(),"Long Date"),Len(Format(Date(),"Long Date"))-5) & " " & Right(Format(Date(),"Long Date"),4)+543
ปล : พวกฟังก์ชั่นเปลี่ยน วันที่เป็น พ.ศ. เนี่ย ต้องระวังนะครับ จะมีปัญหาตอนเดือน ก.พ. นี่หละครับ ที่แต่ละปีจะมี วันไม่เท่ากัน คือ 28 หรือ 29 วันนั่นเอง ดังนั้นถึงแม้เราจะเปลี่ยนค่ามันให้เป็น ปี พ.ศ. ไทย แต่จริงๆแล้ว มันก็คือ ปี ค.ศ. ที่ถูกบวกปีเพิ่มนั่นเองหละครับ ดังนั้น หากเรานำวันที่เหล่านี้ไปคำนวณหาค่า Diff ระหว่างวันหรือจำนวนแล้วละก็จะมีปัญหาในเดือน ที่มี 28 หรือ 29 วัน นะครับ ผมจะได้ว่า อ.Yeadram ก็เคยเจอปัญหาเหล่านี้นะครับ เพราะว่าบางเครื่อง จะเซ็ท Format ปี ไม่เหมือนกัน บ้างก็ เป็น ปี พ.ศ. บ้างก็เป็น ปี ค.ศ. ครับ หากอยากได้ความรู้ในการเปลี่ยน ปี ค.ศ. หรือ พ.ศ. ที่ถูกต้อง ลองค้นหากระทู้เก่าๆ ดูได้ครับ อ.เคยอธิบายไว้แล้ว รู้สึกจะต้อง อ้างอิงถึง ค่าในระบบวินโดวส์ นี่หละครับ โดย อ.สันติสุข เคยหาและแนะนำฟังก์ชั่นเหล่านี้ไว้ ครับ .... (ขออภัยที่พิมพ์ยาวไปหน่อยครับ แฮะๆๆ)
=Left(Format(Date(),"Long Date"),Len(Format(Date(),"Long Date"))-5) & " " & Right(Format(Date(),"Long Date"),4)+543
ปล : พวกฟังก์ชั่นเปลี่ยน วันที่เป็น พ.ศ. เนี่ย ต้องระวังนะครับ จะมีปัญหาตอนเดือน ก.พ. นี่หละครับ ที่แต่ละปีจะมี วันไม่เท่ากัน คือ 28 หรือ 29 วันนั่นเอง ดังนั้นถึงแม้เราจะเปลี่ยนค่ามันให้เป็น ปี พ.ศ. ไทย แต่จริงๆแล้ว มันก็คือ ปี ค.ศ. ที่ถูกบวกปีเพิ่มนั่นเองหละครับ ดังนั้น หากเรานำวันที่เหล่านี้ไปคำนวณหาค่า Diff ระหว่างวันหรือจำนวนแล้วละก็จะมีปัญหาในเดือน ที่มี 28 หรือ 29 วัน นะครับ ผมจะได้ว่า อ.Yeadram ก็เคยเจอปัญหาเหล่านี้นะครับ เพราะว่าบางเครื่อง จะเซ็ท Format ปี ไม่เหมือนกัน บ้างก็ เป็น ปี พ.ศ. บ้างก็เป็น ปี ค.ศ. ครับ หากอยากได้ความรู้ในการเปลี่ยน ปี ค.ศ. หรือ พ.ศ. ที่ถูกต้อง ลองค้นหากระทู้เก่าๆ ดูได้ครับ อ.เคยอธิบายไว้แล้ว รู้สึกจะต้อง อ้างอิงถึง ค่าในระบบวินโดวส์ นี่หละครับ โดย อ.สันติสุข เคยหาและแนะนำฟังก์ชั่นเหล่านี้ไว้ ครับ .... (ขออภัยที่พิมพ์ยาวไปหน่อยครับ แฮะๆๆ)
9 @R08682
ขอบคุณ คุณ Sak ครับ ผมใช้หลายวิธีมาก มีวิธีอะไร ก็ลองไปเรื่อย สนุกดี ข้อดีข้อเสีย ก็ไม่ค่อยรู้มาก แต่ก็ได้จากการแชร์ความรู้ในบอร์ดนี่เองครับ
Time: 0.3199s