Xin chào các bạn,
Mình lại có 2 vấn đề về list box nữa không giải quyết được. Hy vọng đây là những vấn đề cuối cùng về list box mà mình cần giúp đỡ.
Link download file ở đây (download lại giùm mình, vì file tracuu.mdb này là file mới)
http://www.mediafire.com/file/djuyhwnyue2/tracuu.mdb
Vấn đề 1:
Là vấn đề cũ với tblBanhKeo, tblDoChoi, tblVanPhongPham và frmTraCuu.
Việc tra cứu và sử dụng option group đã ổn rồi, nhưng còn một lỗi nhỏ như sau:
Mình đã viết code để mỗi lần chuyển từ loại mặt hàng này (bánh kẹo, đồ chơi, VPP) qua một mặt hàng khác (bánh kẹo, đồ chơi, VPP) thì sản phẩm đang được chọn trong list box sẽ không được ghi nhớ là được chọn nữa (ví dụ đang chọn bánh Fontana thuộc Bánh kẹo thì khi chuyển qua Văn phòng phẩm rồi trở lại Bánh kẹo thì Access không còn ghi nhớ mình vừa chọn bánh Fontana nữa)
Nhưng việc này lại làm phát sinh lỗi: nếu đang chọn sản phẩm nào đó của mặt hàng Đồ chơi chẳng hạn rồi chuyển qua bánh kẹo (hoặc VPP) và bấm bất kỳ phím nào hoặc lăn chuột giữa thì khi trở lại Đồ chơi sẽ bị "treo" (nghĩa là không thể chọn được sản phẩm nào, cũng như không thể nhập dữ liệu vào text box tìm kiếm)
Mình thật sự không biết sửa lỗi này như thế nào. Mong các bạn giúp đỡ mình.
Vấn đề 2:
Liên quan đến tblBDMTKTongHop, tblBDMTK và frmInSoTK.
tblBDMTKTongHop chứa các tài khoản cấp 1. tblBDMTK chứa các tài khoản cấp 2 (là tài khoản con của tài khoản cấp 1)
frmInSoTK thì các bạn không cần quan tâm đến những nút lệnh. Form này có 2 list box: list bên trái hiển thị tài khoản cấp 1 trong tblBDMTKTongHop, list bên phải hiển thị tài khoản cấp 2 trong tblBDMTK tương ứng với tài khoản cấp 1 được chọn bên list trái.
Mình đã viết code để thực hiện việc này, nhưng list bên phải vẫn không load được tên tài khoản cấp 2 tương ứng khi chọn tài khoản cấp 1 bên trái. Các bạn có thể sửa giúp mình không. Dòng lệnh mình dùng là:
Private Sub SoHieuTKTH_Click()
SoHieuTKCT.RowSource = "SELECT SOHIEUTK, TENTK" & "FROM QryBDMTK WHERE SoHieuTK Like '" & SoHieuTKTH & "*'"
SoHieuTKCT.Requery
End Sub
Một lần nữa xin cảm ơn các bạn đã giúp mình trong topic trước, và mong là các bạn có thể giúp mình lần này.
Mình lại có 2 vấn đề về list box nữa không giải quyết được. Hy vọng đây là những vấn đề cuối cùng về list box mà mình cần giúp đỡ.
Link download file ở đây (download lại giùm mình, vì file tracuu.mdb này là file mới)
http://www.mediafire.com/file/djuyhwnyue2/tracuu.mdb
Vấn đề 1:
Là vấn đề cũ với tblBanhKeo, tblDoChoi, tblVanPhongPham và frmTraCuu.
Việc tra cứu và sử dụng option group đã ổn rồi, nhưng còn một lỗi nhỏ như sau:
Mình đã viết code để mỗi lần chuyển từ loại mặt hàng này (bánh kẹo, đồ chơi, VPP) qua một mặt hàng khác (bánh kẹo, đồ chơi, VPP) thì sản phẩm đang được chọn trong list box sẽ không được ghi nhớ là được chọn nữa (ví dụ đang chọn bánh Fontana thuộc Bánh kẹo thì khi chuyển qua Văn phòng phẩm rồi trở lại Bánh kẹo thì Access không còn ghi nhớ mình vừa chọn bánh Fontana nữa)
Nhưng việc này lại làm phát sinh lỗi: nếu đang chọn sản phẩm nào đó của mặt hàng Đồ chơi chẳng hạn rồi chuyển qua bánh kẹo (hoặc VPP) và bấm bất kỳ phím nào hoặc lăn chuột giữa thì khi trở lại Đồ chơi sẽ bị "treo" (nghĩa là không thể chọn được sản phẩm nào, cũng như không thể nhập dữ liệu vào text box tìm kiếm)
Mình thật sự không biết sửa lỗi này như thế nào. Mong các bạn giúp đỡ mình.
Vấn đề 2:
Liên quan đến tblBDMTKTongHop, tblBDMTK và frmInSoTK.
tblBDMTKTongHop chứa các tài khoản cấp 1. tblBDMTK chứa các tài khoản cấp 2 (là tài khoản con của tài khoản cấp 1)
frmInSoTK thì các bạn không cần quan tâm đến những nút lệnh. Form này có 2 list box: list bên trái hiển thị tài khoản cấp 1 trong tblBDMTKTongHop, list bên phải hiển thị tài khoản cấp 2 trong tblBDMTK tương ứng với tài khoản cấp 1 được chọn bên list trái.
Mình đã viết code để thực hiện việc này, nhưng list bên phải vẫn không load được tên tài khoản cấp 2 tương ứng khi chọn tài khoản cấp 1 bên trái. Các bạn có thể sửa giúp mình không. Dòng lệnh mình dùng là:
Private Sub SoHieuTKTH_Click()
SoHieuTKCT.RowSource = "SELECT SOHIEUTK, TENTK" & "FROM QryBDMTK WHERE SoHieuTK Like '" & SoHieuTKTH & "*'"
SoHieuTKCT.Requery
End Sub
Một lần nữa xin cảm ơn các bạn đã giúp mình trong topic trước, và mong là các bạn có thể giúp mình lần này.
