เลือกเป็น default เลยดีกว่าครับ เพราะปกติเวลาตอบแล้วคนเรามักจะอยากอ่านสิ่งที่ตัวเองตอบเลย การกลับสู่หน้ารวม มันจะทำให้เปิดหน้าเดียวกัน (เกือบเหมือนกัน) 2 หน้าน่ะครับ

ขอบคุณครับ

วางไว้ในปุ่มเข้าสู่ระบบครับ

เอาไว้ใน if block ครับ

ถ้า case 1 ก็ให้ disable manager
ถ้า case 2 ก็ให้ disable การตลาด

เปลี่ยนเป็น

Forms![MainMenu]![AdminPage].Enabled = False

คือผมพยายามหลีกเลี่ยงคำสั่ง docmd sendkey f9 น่ะครับ เพราะมันมีผลให้การทำงานของ Numlock ผิดปกติ ถ้าจะเขียน Code ตรวจสอบสถานะของ Numlock ก็ได้ แต่วุ่นวายเพราะ 32 bit กับ 64 bit เขียนโค้ดต่างกันอีก

แนะนำว่าลองเปลี่ยน docmd.requery เป็น docmd.save ดูครับ ถ้าความเร็วในการทำงานอยู่ในช่วงที่รับได้ ก็ใช้ไป แต่ถ้าช้า แสดงว่ามีปัญหาในการวางระบบฐานข้อมูลแล้วล่ะ อาจต้องส่งมาให้ผมดูครับ

ถ้า Combo Box ในฟอร์ม POH ของคุณ กำหนด Record Source จากตารางที่ใช้สร้างฟอร์มเพิ่ม Supplier ให้ใส่ docmd.requery ที่ on click ของ combobox ครับ ชัวร์สุด

คำสั่งซ่อน Navigation Pane

Private Sub Command6_Click()
DoCmd.NavigateTo "acNavigationCategoryObjectType"

DoCmd.RunCommand acCmdWindowHide

End Sub

คำสั่งป้องกัน F11

   
    Select Case KeyCode
          Case vbKeyF11
               KeyCode = 0
               MsgBox "F11 has been disabled.", vbOKOnly, "Disabled Key"
     End Select
   

คลิกเปิดแหล่งข้อมูลแถวครับ

https://docs.microsoft.com/en-us/dotnet/visual-basic/language-reference/statements/on-error-statement