Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Tìm kiếm Record ngay khi gõ trong Combobox - Class
#11
Cảm ơn anh  Lightbulb
Chữ ký của toidjtjmtoi toidjtjmtoi,gia nhập Thủ Thuật Access từ 29-06 -16.
ღღღღღTài sản của toidjtjmtoi (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#12
Cho em hỏi sửa code như nào để sử dụng nhiều combobox trong 1 form ạ
Chữ ký của toidjtjmtoi toidjtjmtoi,gia nhập Thủ Thuật Access từ 29-06 -16.
ღღღღღTài sản của toidjtjmtoi (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#13
(22-03-19, 09:48 PM)toidjtjmtoi Đã viết: Cho em hỏi sửa code như nào để sử dụng nhiều combobox trong 1 form ạ

Mỗi combobox bạn khai báo 1 class cho nó. Khai báo ở phần trên cùng của Form module (Sau dòng "Option Explicit")
Vd:

Mã PHP:
Private faytCbTenTruong     As New clsFAYTCombo
Private faytCbHoTen     As New clsFAYTCombo

Private Sub Form_Load()
  Dim rsTenTruong As DAO.Recordset
  Dim rsHoTen 
As DAO.Recordset

  Set rsTenTruong 
CurrentDb.OpenRecordset(Me.cboTenTruong.RowSource)
  Set Me.cboTenTruong.Recordset rsTenTruong
  faytCbTenTruong
.InitalizeFilterCombo Me.cboTenTruong"Truong"False
  
  Set rsHoTen 
CurrentDb.OpenRecordset(Me.cboNhanVien.RowSource)
  Set Me.cboNhanVien.Recordset rsHoTen
  faytCbHoTen
.InitalizeFilterCombo Me.cboNhanVien"HoTen"False


End Sub 
Chữ ký của ongke0711 If you BORN poor, it's not your mistake. But if you DIE poor, It's your mistake!
ღღღღღTài sản của ongke0711 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn toidjtjmtoi
#14
Thanks anh

Em sử dung combobox này ở sub form . Làm bình thường thì không sao nhưng không hiểu sao mỗi  lần ấn lệnh in nó lại bị lỗi vào báo lỗi ở đoạn code này 
 Set rsHoTen = CurrentDb.OpenRecordset(Me.manvl1.RowSource)

Lúc lỗi lúc không em cũng không hiểu như nào . 
Chỉ em cách khắc phục với
Chữ ký của toidjtjmtoi toidjtjmtoi,gia nhập Thủ Thuật Access từ 29-06 -16.
ღღღღღTài sản của toidjtjmtoi (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#15
Thanks anh

Em sử dung combobox này ở sub form . Làm bình thường thì không sao nhưng không hiểu sao mỗi  lần ấn lệnh in nó lại bị lỗi vào báo lỗi Run Time error 3078  ở đoạn code này 

 Set rsHoTen = CurrentDb.OpenRecordset(Me.manvl1.RowSource)

Lúc lỗi lúc không em cũng không hiểu như nào . 
Chỉ em cách khắc phục với
Chữ ký của toidjtjmtoi toidjtjmtoi,gia nhập Thủ Thuật Access từ 29-06 -16.
ღღღღღTài sản của toidjtjmtoi (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
Lightbulb Hướng Dẫn Tạo form tìm kiếm theo nhiều tiêu chí khác nhau khanhduycsgt 20 14,786 9 Giờ trước
Bài mới nhất: dangvanhoavc
Photo Hướng Dẫn Thay đổi logo trong table Bao Khang 3 306 27-04-19, 12:07 PM
Bài mới nhất: cpucloi
  Hướng Dẫn Hướng dẫn tạo form login trong access (Form đăng nhập) quan_pc 6 414 09-04-19, 10:59 AM
Bài mới nhất: ongke0711
  [Hỏi] Refresh data combobox toidjtjmtoi 3 310 16-03-19, 08:56 AM
Bài mới nhất: toidjtjmtoi
  Nhập tên hàng từ combobox longkd_bvct@yahoo.com.vn 8 817 18-02-19, 04:26 PM
Bài mới nhất: ongke0711

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ| PMA Nha Trang| Gỗ Acrylic Không Đường Line| Phần mềm quản lý bán hàng, công nợ- tồn kho- nhà phân phối