สอบถามวิธีการ บังคับ cursor ไปยัง Textbox ตามการเลือกค่าใน Combobox ครับ

[Peerapach]

จากรูปแนบ ต้องการให้เลือก ประเภทงาน ที่ combo box "Worktype"
แล้ว ให้ cursor ไป ยัง Detail ของ ประเภทงานที่เลือก ครับ
และให้ lock ไม่ให้กรอกข้อมูล textbox ที่ไม่ตรงตามเงื่อนไข การเลือกจาก combo box ครับ

code ที่ เขียน ไว้เบื้องต้น ครับ เหลือให้ lock ไม่ให้กรอกข้อมูล

โค๊ด: [Select]

Private Sub cb_worktype_AfterUpdate()
If Me.cb_worktype.Value = 1 Then
Me.txt_pmsection.SetFocus
Else
Me.txt_cmsection.SetFocus
End If
End Sub
รบกวนอาจารย์ ทุกท่านด้วยนะครับ

[PNR]

ต้องการสั่ง lock หรือ ปิดการใช้งาน textbox ไหน ก็ลองใส่โค้ดตามนี้ดูครับ

Me.Textbox.Locked = True  หรือ False  'ล๊อกไม่ให้แก้ไขข้อมูลใน textbox แต่ Cursor ยัง Setfocus ได้
Me.Textbox.Enabled = False หรือ True  'ปิดการใช้งาน textbox และ Cursor ไม่สามารถ Setfocus ได้

ปกติผมจะสั่งทั้ง 2 อย่างเลยครับในกรณีต้องการปิด เพราะ textbox จะมี background สีเดิมไม่ใช่สีน้ำตาล ลองไปปรับใช้ดูครับ 

[Peerapach]

ขอบพระคุณครับ