ผมทำฟอร์มและซับฟอร์ม โดยใช้ combobox และเขียนโค๊ตโดยดูจาก youtube แล้วมัน error ไม่ทราบว่าในโค๊ตมันผิดตรงไหนครับ
Private Sub cmbNamerec_AfterUpdate()
Dim mynamerec As String
mynamerec = "Select * from tblNamerec where ([namerec]= & '" me.cmbNamerec &"')"
Me.Tblmemo_subform.Form.recorSource = mynamerec
Me.Tblmemo_subform.Requery
End Sub
รบกวนด้วยครับ มือใหม่