Tùy chọn
Refresh lại listbox
- Refresh lại listbox
-
Refresh lại listbox
sinh15071997 > 05-02-17, 09:12 AM
Tình hình là thế này, mình đưa 1 vd dễ hiểu cho mọi người giúp với, có 1 table Danh_sach: gồm STT, Ten, Tuoi. Và 1 table Tuoi. Mình dùng combo box để lọc thông tin Listbox trong table Danh_sach dựa theo tiêu chí Tuoi: Hoc_sinh, Sinh_vien, Di_lam.
Mình code after update trong combo box thế này:
Private Sub Cb_AfterUpdate()
Me.List.RowSource = "Select * from danh_sach where ([Tuoi] = '" & Me.Cb & "')"
Me.List.Requery
End Sub
Vấn đề là giờ mình làm sao để khi mình lọc ra rồi, mình muốn listbox quay lại nguyên trạng như lúc đầu, tức là có đầy đủ tên. Mình khá gà mờ về cái này nên cảm phiền bác nào cao tay giúp với ạ! :3. Mình đã thử button refresh nhưng ko đc
.
Đây là bản demo của mình, các bác có thể xem qua và làm giúp mình với ạ
https://drive.google.com/open?id=0B4gyxn...jM4ajlpY0E -
RE: Refresh lại listbox
sinh15071997 > 05-02-17, 03:22 PM
Ai giúp mình với ạ :'( -
RE: Refresh lại listbox
lmthu > 05-02-17, 05:55 PM
Rất đơn giản
Gắn mã lệnh này vào nút lệnh
Me.List.RowSource = "Select * from danh_sach"
Me.List.Requery -
RE: Refresh lại listbox
sinh15071997 > 05-02-17, 06:04 PM
-
RE: Refresh lại listbox
maidinhdan > 07-02-17, 05:01 PM
(05-02-17, 06:04 PM)sinh15071997 Đã viết:
(05-02-17, 05:55 PM)lmthu Đã viết: Rất đơn giản
Gắn mã lệnh này vào nút lệnh
Me.List.RowSource = "Select * from danh_sach"
Me.List.Requery
Thanks so much. Mà cho mình hỏi với, mã lệnh VBA này là một ngôn ngữ con của VB6 đúng ko ạ? Tức là có thể nói mã này vừa là VBA vừa là VB6 đúng ko ạ?
Câu hỏi này Google có thể trả lời cho bạn.