Liên kết hai Combo boxes với Subform

[khanhminh0608]

Xin chào cả nhà!
Mình đang tự học Access và nay mình gặp một vấn đề khi thiết kế một MainForm để nhập dữ liệu. Hiện nay mình đang rất bí và chưa có cách giải quyết. cụ thể MainForm của mình chứa 3 đối tượng, 2 Combobox và một SubForm trong đó:
combo thứ nhất có tên: cboLop
combo thứ hai có tên: cboTenHocSinh và được giới hạn bởi sự kiện After-Update của cboLop. Tức là mỗi khi ta chọn Tên lớp trên cboLop thì chỉ có những học sinh của lớp đó hiển thị trên cboTenHocSinh. Giờ đây nếu muốn dùng kết quả của cboTenHocSinh để làm Link Master Field cho SubForm SfbHocSinhInfo trên cơ sở chung Field HocSinhID thuộc SfbHocSinhInfo với mục đích xem và nhập dữ liệu cho từng học sinh (đã được chọn ở cboTenHocSinh) thì mình phải làm như thế nào?
Nếu ai có cách làm xin hãy chỉ giáo.
Xin chân thành cảm ơn

 

[dzung]

Bạn làm thế này nhé:

Trong đối tượng: SubForm =>data
Link Master Fields: cboTenHocSinh
Link Child Fields: HocSinhID

Note: trong cboTenHocSinh ở combox này bạn phải chọn 2 cột gồm HocSinhID , tenhocsinh(trong phần row source) and Bound column=1.
Chúc thành công nhé.

 

[khanhminh0608]

Bạn làm thế này nhé:

Trong đối tượng: SubForm =>data
Link Master Fields: cboTenHocSinh
Link Child Fields: HocSinhID

Note: trong cboTenHocSinh ở combox này bạn phải chọn 2 cột gồm HocSinhID , tenhocsinh(trong phần row source) and Bound column=1.
Chúc thành công nhé.

Không được đâu, bác xem lại hộ em cái? :wall: ( Bac lưu ý là cboTenHocSinh đã được giới hạn bởi cboLop, Tức là sau khi chọn lớp ở cboLop và bác Click vào cboTenHocSinh thì chỉ còn những học sinh thuộc lớp bác đã chọn mới có trong danh sách thôi. Bác hiểu ý không?) Còn trường hợp bác đề cập chi có thể OK khi cboTenHocSinh đứng riêng lẻ và Lookup từ Table gốc với toàn bộ học sinh thôi:063:
Bác xem lại hộ em với nhé, Cảm ơn bác nhiều!

 

[dzung]

cboTenHocSinh giới hạn hay không vẫn chạy tốt!
Có thể cái after_update của bạn có vấn đề rồi:

bạn viết như zậy là nó chạy OK liền:


Private Sub cboLop_AfterUpdate()
cboTenHocSinh .Value = ""
cboTenHocSinh .Requery
End Sub

cboTenHocSinh =>Row source:

SELECT HocSinhID , tenhocsinh
FROM hocsinh
WHERE malop=[Forms]![tenformcuaban]![cboLop];

Trong đối tượng: SubForm =>data
Link Master Fields: cboTenHocSinh
Link Child Fields: HocSinhID