ติดตรงที่ FindEmployee ครับ Private Sub cbo_FullName_AfterUpdate() If Not IsNull(Me.cbo_FullName) Then FindEmployee "[ÃËÑʾ¹Ñ¡§Ò¹]", Me.cbo_FullName Else Me.cbo_NO = "'" End If End Sub ลอง Debug Compile error : Sub or Function not defined ครับ จะแก้ตรงไหนครับอาจารย์
ติดตรงที่ findemployee อ่าค่ะ ต้องทำใงอ่า ค่ะ
ให้ตัวหนังสือเป็นไทย ไม่เป็นตัวขอม ให้กำหนด option ของ visual basic;editor format;normal text=Tahoma (Thai) ครับ
ตรง Cbo_FullName ติดตรงที่ findemployee อ่ะคะ ทำใหม่ก็ยังไม่หายค่ะ ต้องแก้ยังงัยค่ะ
ตามมาศึกษาต่อครับ มีคู่มือ access กับ vba เล่มไหนน่าอ่านบ้างครับ โดยเฉพาะvba อยากได้เล่มที่อธิบายละเอียดอ่านเข้าใจง่ายหน่อยมีที่มาที่ไป บางเล่มไปอ่านดูเหมือนต้องลอกโค้ดเค้าอย่างเดียว
อื่ม! ออกตัวก่อนนะครับว่าผมไม่ค่อยได้อ่านมานานแล้ว ไม่รู้ว่ามีเล่มไหนออกมาใหม่ดีกว่าหรือไม่ แต่ถ้าผมแนะนำก็เล่มตามลิ้งต์นี้ครับ
www.se-ed.com/product/การเขียนโปรแกรม-VBA-และมาโครบน-Access-2007-PDF.aspx?no=9786160806287
มันมีแต่เป็น E-Book แล้วนะครับ แบบเป็นหนังสือไม่มีแล้วมั้ง ไม่แน่ใจลองหาดูครับ
ซึ่งจะเป็นของ 2007 แต่หลักการณ์จะเหมือนกันครับ เนื้อหาค่อนข้างครบ แต่จริงๆนะ ด้วยการที่มันเป็นการเขียนโปรแกรมคงไม่มีหนังสือเล่มไหนได้เนื้อหาละเอียดได้ทุกอย่าง เราอ่านทำความรู้จักแนวคิดหลักการณ์พื้นฐานแล้วก็มาหาประสบการณ์ด้วยการลองทำโจทย์ต่างๆถึงจะเก่งขึ้นครับ
ขอบคุณครับ
พิมพ์โค้ต ตามทุกอย่่าง แต่ว่า เออเร่อหมดเลย ในแบบ ฟอร์ม พิมพ์ภาษาไทยใน ช่องcode ไม่ได้อะครับ จะทำงานนำเสนอ อาจารย์ด้วย เซงๆเลย
พิมพ์ภาษาไทยใน VBE ไม่ได้ ให้เข้าไปกำหนดเป็นฟอนต์ภาษาไทยตามรูปนี้ครับ photos.app.goo.gl/KPLXgn4nUyDLVRt8A
ขอบคุณมากครับพี่ได้ประโยชน์เยอะเลยครับจะนำมาปรับใช้กับหน้างาน
ติดตรงที่ FindEmployee ครับ
Private Sub cbo_FullName_AfterUpdate()
If Not IsNull(Me.cbo_FullName) Then
FindEmployee "[ÃËÑʾ¹Ñ¡§Ò¹]", Me.cbo_FullName
Else
Me.cbo_NO = "'"
End If
End Sub
ลอง Debug
Compile error : Sub or Function not defined ครับ
จะแก้ตรงไหนครับอาจารย์
รบกวนขอคำปรึกษาหน่อยครับ คือสมมติว่าเราจะเก็บข้อมูลที่อยู่ แล้วให้เรา dropdown เลือกจังหวัดก่อน แล้วเวลาที่จะเลือกอำเภอให้มัน dropdown เฉพาะอำเภอที่อยู่ในจังหวัดที่เราเลือกจะต้องทำยังไงครับ
ผมเคยทำไฟล์แบบนี้แจกในพันทิป ลองโหลดไปศักษาดูนะครับ
bit.ly/Address_ComboBox
ผมอยากให้พี่ลงคลิป สอนการทำฐานข้อมูลกับการทำใบสั่งซื้อสินค้าของแผนกจัดซื้อให้จังเลยครับ
ไม่ค่อยมีความรู้เรื่องการจัดซื้ออะครับ
ผมทำตามคลิปทุกอย่างแล้วแต่พอมาRunดูค่าในฟอร์มไม่เปลี่ยนตามคลิป ต้องแก้ยังไงครับ #ผมทำเป็นภาษาอังกฤษครับ
อื่ม! รายละเอียดมันเยอะ ต้องลองตรวจสอบ Event ต่างๆดูอะครับ ว่าถูกต้องมั๊ย ผมทำเองหลายครั้งต้องมานั่งไล่ดูทีละขั้นตอนเหมือนกัน การเขียนโค้ดผิดนิดหน่อยก็ไม่ได้ครับ
@@AccessCreator มันไม่เกี่ยวกับ font ภาษาใช่ไหมครับ
Me(CTL.Name).Enable = iNO ตรงนี้บัคครับ งงมากไปต่อไม่ถูก ลองทำตามที่สอน
เพราะอะไรเวลาที่กดแก้ไขพนักงานแล้วถึงขึ้นแจ้งเตือน Error : sub or function not defined ms access ค่ะอาจารย์
โค้ดหรือฟังก์ชั่นที่เขียนน่าจะมีปัญหาครับ ลองตรวจสอบดู
ติด Error ตรงนี้ครับ Me(CTL.Name).Enabled = iNO พิมพ์ตาม วนคลิปดูสามรอบ ก็ไม่มีไรผิดแต่มัน ไม่ผ่านอะครับ
ทำแท๊บ ตารางหายอ่ะคะ กดคืนตรงไหนได้คะ อ.
แท็บตรงไหนครับ ไม่เข้าใจ
@@AccessCreator ตอนนี้หาเจอแล้วคะ อ. ขอบคุณนะคะ
อยากทราบว่าต้องกำหนดเลขบัตรประจำตัวประชาชนแบบว่ามี - ขึ้นอัตโนมัติเลยต้องทำยังไงคะ
ผมกด DAO แต่มันไม่ขึ้นอ่ะครับ นาที28
photos.app.goo.gl/re2cuuJ1xbxTBLJr5
rs.FindFirst nField & " = " & strFind & "" มันบัคตรงนี้นะค่ะ
ตรวจสอบเรื่อง " และ ' ต้องใส่ให้ถูกครับ ไม่งั้นมันจะไม่มองเป็นค่า String
rs.FindFirst nField & " = '" & strFind & "'"
ขอโทษนะคะอยากทราบว่าแก้ยังไงคะ เช็คแล้วก็ไม่ได้ค่ะ
มีประโยชน์มากครับดูทุกวันครับแล้วทำตามครับ