กระทู้เก่าบอร์ด อ.Yeadram
        
           2,221   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.0618s
    
      
		