***เพิ่มเติมค่ะ
Private Sub Modelcmb_AfterUpdate()

    Me.Combo55.RowSource = "SELECT Truck_THA " & _
                             "FROM Trucktbl " & _
                             "WHERE Model = " & (Me.Modelcmb)
End Sub

ตอนนี้ใช้โค้ดนี้อยู่ค่ะ แต่หลังจากเลือกcomboboxแรก (Modelcbm) จะมีพารามิเตอร์ให้กรอกเองค่ะ
แล้วจึงแสดงรายการที่กรองมาในcombobox2 (Combo55)

แก้โค้ดตรงไหนที่จะให้เลือกจากModelcmb แล้วไม่มีพารามิเตอร์ขึ้นอะค่ะ

รบกวนช่วยหน่อยนะคะ

เพิ่มเติมค่ะ
เราดัดแปลงมาจากกระทู้นี้

http://www.thai-access.com/yeadram_view.php?topic_id=3125&page=2


คิดว่าทำถูกแล้วนะคะ แต่ก็ขึ้นพารามิเตอร์แก้ไม่หาย
โค้ดเราเป็นแบบนี้ค่ะ

Private Sub Combo134_GotFocus()

If Nz(Me.Combo132, "") = "" Then
    Me.Combo134.RowSource = ""
Else
    Me.Combo134.RowSource = "SELECT Trucktbl.Truck_THA, Trucktbl.BodyName_THA, Trucktbl.Model FROM Trucktbl WHERE Trucktbl.Model =" & Me.Combo132.Column(0) & ";"
End If

End Sub



ช่วยหน่อยนะคะ

ลงดูวิธีการทำอย่างนี้นะครับ ไม่รู้ช่วยได้ป่าว
VDO

ยังไม่ได้เลยค่า ติดโค้ดอะค่ะ