E có vấn đề này mong được hướng dẫn:
Có textbox vs listbox trên form. Giờ gõ điều kiện vào textbox thì dữ liệu tương ứng trong listbox cũng nhảy theo điều kiện tương ứng (ở đây mình khống dùng query để thực hiện).
Vậy xin hỏi các pác có code nào thực hiện k ạ?
Xin cảm ơn!!

(14-08-19, 08:11 AM)mrtoanbin Đã viết: E có vấn đề này mong được hướng dẫn:
Có textbox vs listbox trên form. Giờ gõ điều kiện vào textbox thì dữ liệu tương ứng trong listbox cũng nhảy theo điều kiện tương ứng (ở đây mình khống dùng query để thực hiện).
Vậy xin hỏi các pác có code nào thực hiện k ạ?
Xin cảm ơn!!

B thử cái đoạn code này xem đúng ý bạn không 

Private Sub TextBox1_AfterUpdate()
      Dim strSQL As String

      strSQL = "SELECT ID,  Name " & _
                  "FROM Table_A " & _
                  "WHERE  Name Like '" & Me!TextBox1.Text & "*'"

       Me!lTextBox1.RowSource = strSQL

End Sub

Access thế mạnh là CSDL liên hệ, các form, report lấy nguồn từ table, query. Bạn không muốn dùng cái mạnh của nó chẳn lẻ lại muốn dùng Mảng (Array) để gán trị cho listbox (giống UserForm của Excel)? Trở ngại gì mà bạn không muốn dùng Query?

(14-08-19, 09:17 AM)ongke0711 Đã viết: Access thế mạnh là CSDL liên hệ, các form, report lấy nguồn từ table, query. Bạn không muốn dùng cái mạnh của nó chẳn lẻ lại muốn dùng Mảng (Array) để gán trị cho listbox (giống UserForm của Excel)? Trở ngại gì mà bạn không muốn dùng Query?

không liên quan chứ bác có quả avatar quay quay thì làm kiểu gì vậy ạ?

(14-08-19, 09:21 AM)Cuong Servenet Đã viết:

(14-08-19, 09:17 AM)ongke0711 Đã viết: Access thế mạnh là CSDL liên hệ, các form, report lấy nguồn từ table, query. Bạn không muốn dùng cái mạnh của nó chẳn lẻ lại muốn dùng Mảng (Array) để gán trị cho listbox (giống UserForm của Excel)? Trở ngại gì mà bạn không muốn dùng Query?

không liên quan chứ bác có quả avatar quay quay thì làm kiểu gì vậy ạ?

Haha....kiếm cái file GIF là avatar thôi.

(14-08-19, 09:07 AM)Cuong Servenet Đã viết:

(14-08-19, 08:11 AM)mrtoanbin Đã viết: E có vấn đề này mong được hướng dẫn:
Có textbox vs listbox trên form. Giờ gõ điều kiện vào textbox thì dữ liệu tương ứng trong listbox cũng nhảy theo điều kiện tương ứng (ở đây mình khống dùng query để thực hiện).
Vậy xin hỏi các pác có code nào thực hiện k ạ?
Xin cảm ơn!!

B thử cái đoạn code này xem đúng ý bạn không 

Private Sub TextBox1_AfterUpdate()
      Dim strSQL As String

      strSQL = "SELECT ID,  Name " & _
                  "FROM Table_A " & _
                  "WHERE  Name Like '" & Me!TextBox1.Text & "*'"

       Me!lTextBox1.RowSource = strSQL

End Sub

ĐÃ ĐÚNG NHU CẦU, XIN CẢM ƠN Ạ!

(14-08-19, 09:17 AM)ongke0711 Đã viết: Access thế mạnh là CSDL liên hệ, các form, report lấy nguồn từ table, query. Bạn không muốn dùng cái mạnh của nó chẳn lẻ lại muốn dùng Mảng (Array) để gán trị cho listbox (giống UserForm của Excel)? Trở ngại gì mà bạn không muốn dùng Query?

Mình chỉ tối giản thao tác và chuyên nghiệp hơn, thanks pác!

(15-08-19, 11:43 AM)mrtoanbin Đã viết:

(14-08-19, 09:17 AM)ongke0711 Đã viết: Access thế mạnh là CSDL liên hệ, các form, report lấy nguồn từ table, query. Bạn không muốn dùng cái mạnh của nó chẳn lẻ lại muốn dùng Mảng (Array) để gán trị cho listbox (giống UserForm của Excel)? Trở ngại gì mà bạn không muốn dùng Query?

Mình chỉ tối giản thao tác và chuyên nghiệp hơn, thanks pác!

Câu lệnh trên cũng là Query chứ là gì nữa, chỉ là dùng Saved Query (trong ngăn Query của Database) hay dùng câu lệnh query bằng Jet-SQL trong code VBA thôi.
Bạn phải yêu cầu là dùng code VBA chứ không phải là không dùng Query. Không dùng câu lênh Query thì chỉ có cách dùng Array thôi.