Page 1 of 1

โค้ดวันที่ปัจจุบัน

Posted: Thu Nov 09, 2017 1:07 pm
by Benmore
รบกวนขอสอบถามโค้ดวันที่ปัจจุบันที่จะใส่ไว้ใน Combobox ด้วยค่ะ :D

Re: โค้ดวันที่ปัจจุบัน

Posted: Thu Nov 09, 2017 5:14 pm
by logic
เดิมเขียนไว้แบบไหน ติดอะไร จะได้ช่วยกันดู

ต้องเขียนโค้ดกันมาเองก่อนตามกติกาครับ :)

Re: โค้ดวันที่ปัจจุบัน

Posted: Thu Nov 09, 2017 8:09 pm
by Benmore
logic wrote:เดิมเขียนไว้แบบไหน ติดอะไร จะได้ช่วยกันดู

ต้องเขียนโค้ดกันมาเองก่อนตามกติกาครับ :)
ที่ Userform1 ค่ะ
:arrow: admin
:arrow: 123

Code: Select all

Private Sub comday_Change()
comday = Format(YourDate, "dd")
End Sub
Private Sub commonth_Change()
commonth = Format(YourDate, "mmmm")
End Sub
Private Sub comyear_Change()
comyear = Format(YourDate, "yyyy")
End Sub

Re: โค้ดวันที่ปัจจุบัน

Posted: Thu Nov 09, 2017 8:15 pm
by snasui
:D ปัญหาที่เขียนมาเองแล้วนั้นคืออะไรครับ

ในเบื้องต้นกรณีต้องการวันที่ปัจจุบัน ให้เปลี่ยน YourDate เป็น Today หรือหากว่า YourDate เป็นวันที่ปัจจุบันอยู่แล้วให้แจ้งปัญหามาด้วยครับ

กรุณากลับไปรายงานผลในกระทู้ที่ได้คำตอบแล้วทุกกระทู้ตามกฎการใช้บอร์ดข้อ 6 ยกเว้นกระทู้ที่ยังเป็นปัญหาและมีคำถามต่อเนื่อง

โดยคลิกที่ Link นี้ครับ search.php?keywords=&terms=all&author=B ... mit=Search

Re: โค้ดวันที่ปัจจุบัน

Posted: Thu Nov 09, 2017 8:24 pm
by Benmore
snasui wrote::D ปัญหาที่เขียนมาเองแล้วนั้นคืออะไรครับ

ในเบื้องต้นกรณีต้องการวันที่ปัจจุบัน ให้เปลี่ยน YourDate เป็น Today หรือหากว่า YourDate เป็นวันที่ปัจจุบันอยู่แล้วให้แจ้งปัญหามาด้วยครับ

กรุณากลับไปรายงานผลในกระทู้ที่ได้คำตอบแล้วทุกกระทู้ตามกฎการใช้บอร์ดข้อ 6 ยกเว้นกระทู้ที่ยังเป็นปัญหาและมีคำถามต่อเนื่อง

โดยคลิกที่ Link นี้ครับ search.php?keywords=&terms=all&author=B ... mit=Search
คืออยากให้แสดงวันที่ปัจจุบันใน comcbobox ค่ะ
แต่ตอนนี้ไม่แสดงค่าอะไรเลยค่ะ

Re: โค้ดวันที่ปัจจุบัน

Posted: Thu Nov 09, 2017 8:35 pm
by snasui
:D Mark ตัวแปร comday, commonth, comyear ให้เป็น Comment ก็จะแสดงค่าใน ComboBox แล้วครับ

ไม่ทราบกำลังจะทำอะไร เพื่อให้เกิดผลตรงไหน อยา่งไร กรุณาอธิบายเพิ่มเติมมาด้วยจะได้เข้าใจตรงกันครับ

Re: โค้ดวันที่ปัจจุบัน

Posted: Thu Nov 09, 2017 8:46 pm
by Benmore
snasui wrote::D Mark ตัวแปร comday, commonth, comyear ให้เป็น Comment ก็จะแสดงค่าใน ComboBox แล้วครับ

ไม่ทราบกำลังจะทำอะไร เพื่อให้เกิดผลตรงไหน อยา่งไร กรุณาอธิบายเพิ่มเติมมาด้วยจะได้เข้าใจตรงกันครับ
ต้องการให้แสดงตามรูปค่ะ แต่ตอนนี้มันยังไม่แสดงค่ะ

Re: โค้ดวันที่ปัจจุบัน

Posted: Thu Nov 09, 2017 8:59 pm
by snasui
:D เขียนตอนเรียก Form หรือตอน Initialize ในตอนเลือกค่าไม่ต้องกำหนดให้แสดงการกระทำใดครับ

ตัวอย่าง Code

ค่าใน ComboBox ที่แสดงวันที่เป็น comday.Text=Application.Text(Date,"d")
ค่าใน ComboBox ที่แสดงเดือนเป็น commonth.Text=Application.Text(Date,"mmmm")
ค่าใน ComboBox ที่แสดงปีเป็น comyear.Text=Application.Text(Date,"yyyy")

Re: โค้ดวันที่ปัจจุบัน

Posted: Sun Nov 12, 2017 9:55 am
by Benmore
ทำได้แล้วขอบคุณมากค่ะ