ต้องการสั่งให้ Combo box ใน sub form Requery

[Tatchawin]

สวัสดีครับ

สอบถามปัญหาตามหัวข้อเลยครับ ผมต้องการให้ Combo box ใน Subform Requery หลังจากที่เราเปลี่ยนแปลงค่า Combo box ใน Mainform ครับ
พยายาม Reference ไปที่ combo box ใน Text Form เท่าไหร่ก็ไม่ได้สักที ยังไงช่วยแก้ให้หน่อยนะครับ

ขอบคุณครับ
ปล. โค้ดที่ผมเขียนอยู่ด้านล่างครับ ลอง reference หลายๆแบบ ก็ยังไม่ได้

Private Sub txtPlantID_AfterUpdate()
'    Me.Forms![frmqryCardDetail]![txtNationalID].requey
'    Forms![frmCreateCard]![frmqryCardDetail].Form![txtNationalID].Requery
'    Me.[frmSubEditWork3].[Form]![txtNationalID].Requery
'    Forms!frmqryCardDetail!txtNationalID.Requery
'    Me!frmqryCardDetail.Form.txtNationalID.Requery
'    Me!frmqryCardDetail.Form!txtNationalID.Requery
'    Forms![frmCreateCard]![frmqryCardDetail].Form![txtNationalID].Requery
'    Forms![frmCreateCard]![frmqryCardDetail]![txtNationalID].Requery
Form![frmqryCardDetail]![txtNationalID].requey
End Sub

[PNR]

อาจจะเกิดจากสาเหตุอื่นๆ ได้ครับ
เช่นการกำหนด เชื่อมโยงข้อมูลหลัก กับข้อมูลลูก ตรงนี้ก็มีส่วนเหมือนกัน
ต้องดูการกำหนด RecordSource ของคอมโบ txtNationalID ด้วยครับว่าตั้งค่าถูกหรือไม่

[Tatchawin]

มันขึ้นว่า หา Subform ไม่เจอครับ ตามภาพ ผมลองทำแบบอยู่บน Main Form มันก็ทำได้นะครับ งงมาก

[PNR]

ที่มุมมองออกแบบ บน MainForm ให้คุณกดติ๊กที่ Subform แล้วที่คุณสมบัติของ Subform ดูชื่อจริงๆของ Subformครับมันไม่ได้ชื่อเดียวกับที่คุณตั้งไว้เสมอไป ถ้าจะแก้ให้ตรงต้องแก้ตรงนั้นครับ

[Tatchawin]

ได้แล้วครับ เส้นผมบังภูเขาแท้ๆ ผมไปเผลอเปลี่ยนชื่อ Control นี่เอง ลืมไป 
ขอบคุณมากครับ

[Tatchawin]

ขอสอบถามเพิ่มเติมครับ จากภาพ Combo Box cbNationalID ใน Subform จะถูกกรองตาม cbPlantID บน Mainform ตามที่เลือก
หากผมต้องการเขียน expression ที่ Properties ของ Row source ให้กรองว่าหากเลือก cbPlantID = 5 แล้ว cbNationalID จะไม่ต้องถูกกรองตาม
แต่ถ้าเปลี่ยน cbPlantID เป็นเลขอื่นจะกรองหมด จะต้องเขียนอย่างไรครับ

ขอบคุณล่วงหน้าสำหรับคำตอบครับ

[PNR]

ใช้การกำหนด RowSource ครับ ตัวอย่าง
สมมุติ ชื่อตาราง table1
        ชื่อฟิลล์ที่นำมาแสดงชื่อรายการในคอมโบบ๊อกชื่อ NationalID

Private Sub cbPlantID_AfterUpdate()
Dim SQL As String
If Me.cbPlantID = 5 Then
SQL = "SELECT NationalID  FROM Table1;"
Else
SQL = "SELECT NationalID FROM Table1 WHERE (((PlantID)=[forms]![ชื่อฟอร์มหลัก]![cbPlantID]));"
End If
Forms![ชื่อฟอร์มหลัก]![ชื่อฟอร์มย่อย].Form.cbNationalID.RowSource = SQL
End Sub

[Tatchawin]

ขอบคุณคุณ PNR มากๆครับผม