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

Xuất giá trị 2 field trong 1 Query ra Msgbox (thông báo)

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thủ thuật VBA
  • Xuất giá trị 2 field trong 1 Query ra Msgbox (thông báo)
• Xuất giá trị 2 field trong 1 Query ra Msgbox (thông báo)

• Xuất giá trị 2 field trong 1 Query ra Msgbox (thông báo)

  Đình Phán > 03-06-22, 06:14 PM

  Chào các anh, chị trong diễn đàn.
  
  Hiện em có làm 1 query để xuất ra 2 cột, là các giá trị có tại bảng A nhưng không có tại bảng B
  Giờ em muốn gán lần lượt các giá trị đó là Msgbox.
  Tức là sẽ hiện ra màn hình thông báo rằng các giá trị này không có trong bảng B
  
  Ví dụ như trong excel thì dễ, em có thể gán từng giá trị của range (dùng vòng lặp) ra Msgbox được.
  Nhưng với Recordset trong Access thì em còn mông lung quá.
  
  Mong các anh, chị giúp đỡ. Cảm ơn!

• RE: Xuất giá trị 2 field trong 1 Query ra Msgbox (thông báo)

  AnNguyen > 04-06-22, 11:28 AM

  T nghĩ bạn nên dùng form để hiển thị ra list đó thì hợp lý hơn vì trong form mình cho cả cái query đó vào listbox đẹp hơn. Chứ show ra msgbox cũng được thôi nhưng nếu dài quá nó sẽ xấu. Còn cách dùng bạn vẫn dùng for để lấy giá trị thôi. Sau mỗi giá trị thì thêm vbNewline vào để xuống dòng

• RE: Xuất giá trị 2 field trong 1 Query ra Msgbox (thông báo)

  ongke0711 > 04-06-22, 03:12 PM

  (03-06-22, 06:14 PM)Đình Phán Đã viết: Ví dụ như trong excel thì dễ, em có thể gán từng giá trị của range (dùng vòng lặp) ra Msgbox được.
  Nhưng với Recordset trong Access thì em còn mông lung quá.

  
  Đối với Recordset thì dùng cú pháp: Do Until ...Loop/ Do While....Loop
  Ví dụ:
  
  

  Mã PHP:

  If rst.EOF And rst.BOF Then Exit Sub
sMgs = ""
rst.MoveFirst
Do Until rst.EOF
   sMsg = sMsg & rst!CotLayDuLieu & vbNewLine
   rst.MoveNext
Loop 

• Bài trước Bài tiếp