• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

[Help] v/v load từ datatable theo điều kiện lọc thể hiện lên combobox

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Thành viên giúp nhau
  • [Help] v/v load từ datatable theo điều kiện lọc thể hiện lên combobox
• [Help] v/v load từ datatable theo điều kiện lọc thể hiện lên combobox

• [Help] v/v load từ datatable theo điều kiện lọc thể hiện lên combobox

  vuga > 07-01-17, 01:32 PM

  Kính gởi Anh Chị. Nhờ Quý Anh Chị giúp đỡ về việc load từ datatable theo điều kiện lọc thể hiện lên combobox nhưng nó không thể hiện được lên combox.
  
  Table: T_HoaDon_nhap(id_hd_nhap,ngay_nhap,Ten_HD_nhap) với id_hd_nhap là khóa chính
  Combobox: combo_TonKho 
  +++++++++++++++++++++++++++++++++++
  
  - e đã viết code cho form với nút xem phiếu tồn kho nhưng nó không show được trên combox
  - cho e hỏi là nếu như 1 muốn gán 1 listbox theo điều kiện khi click chọn combox thì e sẽ sử dụng thuộc tính nào của combox
  
  Trân trọng cảm ơn Quý Anh Chị đã tận tình giúp đỡ e trong thời gian này. Chân thành cảm ơn.
  
  Đoạn code:
  
  Private Sub cmd_xemPhieuTonKho_Click()
  Const conJetDate = "\#mm\/dd\/yyyy\#"
  Dim strCriteria, task As String
  
  If IsNull(Me.TxTDateFrom) Or IsNull(Me.txtDateTo) Then
      MsgBox "Vui Long Nhap Chuoi Ngay", vbInformation, "Chuoi Ngay duoc yeu cau"
      Me.TxTDateFrom.SetFocus
  Else
      strCriteria = " BETWEEN " & Format(Me.TxTDateFrom, conJetDate) & " AND " & Format(Me.txtDateTo, conJetDate)
      task = "SELECT * FROM  T_HoaDon_nhap WHERE ngay_nhap='" & strCriteria & "'"
      'MsgBox task
      'Me.combo_TonKho.RowSource = task
      'MsgBox (Me.combo_TonKho.ColumnCount)
      Me.combo_TonKho.RowSourceType = task
      Me.combo_TonKho.RowSource = task
      Me.combo_TonKho.Requery
  End If
  End Sub

• RE: [Help] v/v load từ datatable theo điều kiện lọc thể hiện lên combobox

  cpucloi > 07-01-17, 03:15 PM

  Thông thường, muốn xem dữ liệu thì bạn nên load nó vào subform, listbox hoặc đưa ra report
  
  Combobox sử dụng hạn chế hơn listbox trong trường hợp muốn xem dữ liệu, nó thường dùng để lựa chọn nhanh các điều kiện (và để load vào những nơi khác)
  
  Vài lời tham góp
  
  
  P/s: Quên đấy, để load dữ liệu thì thường sử dụng thuộc tính AfterUpdate của Conbobox
  VD: 
  .....
  subform.requery
  (listbox.requery)

• RE: [Help] v/v load từ datatable theo điều kiện lọc thể hiện lên combobox

  vuga > 08-01-17, 01:02 AM

  (07-01-17, 03:15 PM)cpucloi Đã viết: Thông thường, muốn xem dữ liệu thì bạn nên load nó vào subform, listbox hoặc đưa ra report
  
  Combobox sử dụng hạn chế hơn listbox trong trường hợp muốn xem dữ liệu, nó thường dùng để lựa chọn nhanh các điều kiện (và để load vào những nơi khác)
  
  Vài lời tham góp
  
  
  P/s: Quên đấy, để load dữ liệu thì thường sử dụng thuộc tính AfterUpdate của Conbobox
  VD: 
  .....
  subform.requery
  (listbox.requery)

  
  Hi, e có 1 form - gồm 2 textbox để nhập ngày từ ngày & đến ngày
  
  có nút View Chứng từ nhập kho, Khi click vào view chứng từ nhập kho thì là sẽ gán datable theo điều kiện lọc từ ngày đến ngày vào combox để cho người dùng chọn những chứng từ nhập theo ngày
  
  và sau khi chọn 1 chứng từ trong combo thì người dùng chọn thêm nút chi tiết chứng từ thì e sẽ gán chi tiết chứng từ nhập đó vào list để người dùng xem được chi tiết.
  
  Nhưng khi e viết code thì nó không show lên được:
  
  Đoạn code đó là e code cho nút View chứng từ nhập kho, nhưng viết mãi thì nó hok đổ giá trị cho combo đc 
  
  
  Thks a đã có lời góp ý chân thành

• RE: [Help] v/v load từ datatable theo điều kiện lọc thể hiện lên combobox

  ongke0711 > 08-01-17, 11:54 AM

  Bạn phải sửa câu lệnh SQL làm Row Source cho combobox. Bạn chỉ cần lấy cột Ngày nhập thôi. 
  
  task = "SELECT T_HoaDon_nap.ngay_nhap FROM  T_HoaDon_nhap GROUP BY T_HoaDon_nap.ngay_nhap HAVING ngay_nhap=" & strCriteria
  
  - Bạn dùng SELECT * nó lấy hết dữ liệu các trường -> lãng phí tài nguyên bộ nhớ cho việc load các trường không cần dùng tới cho combobox.
  - Dùng GROUP BY để nó gộp các ngày trùng nhau thành 1 dòng.
  
  Tham số điều kiện dạng ngày phải nằm trong cặp #...#. Ở câu lệnh của strCriteria đã dùng Format (..,conJetDate) rồi tức là đã có thêm cặp #...# rồi nên không cần thêm nữa và không được dùng dấu nháy đơn " ' ".
• Bài trước Bài tiếp