Chủ đề: Đưa nhiều record vào một Unbound
-
09-16-2009, 07:32 PM #1Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Đưa nhiều record vào một Unbound
Em có điều này mắc anh chị ah, em muốn là khi On Got Focus đến txtL thì nhận được tất cả các Record có trong tblSTK trong cột Se (http://www.megafileupload.com/en/file/135292/ViDu-zip.html).
Khi đó txtL được nhìn thấy giống như là: AB1, AB2, AB3, .....
Mong được anh chị chỉ bảo để em khắc phục thiếu sót bấy lâu em không làm được.
Em xin chân thành cảm ơn!View more random threads:
- Bấm nút ESC tự đóng Forms
- Giúp mình bị lỗi phóng to chữ trong Form của Access !
- Lấy dữ liệu từ một form sang form khác
- Xây dựng CSDL in hóa đơn thanh toán tiền bắt đầu như thế nào?
- Gán nút lệnh cho phím chức năng.
- [help] Giúp em giải quyết cách liên kết giữa 2 combo box,1 text box với
- Chuyên đề ứng dụng : Thiết kế chương trình Sổ Quỹ Tiền Mặt(Phần 1 - Table và Form)
- Làm đông hồ đếm ngược trong Access
- Lập trình bảo mật cơ sở dữ liệu Access
- Không cập nhật được khi tiến hành Append rồi Delete
-
09-16-2009, 08:26 PM #2Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Đưa nhiều record vào một Unbound
Gửi bởi dtngoc
Private Sub txtL_GotFocus()
Dim st As String
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("tblSTK")
rs.MoveFirst
Do While Not rs.EOF
st = st & UCase(rs("Se")) & ","
rs.MoveNext
Loop
Set rs = Nothing
txtL = Left(st, Len(st) - 1)
End Sub
-
09-17-2009, 07:24 PM #3Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Đưa nhiều record vào một Unbound
Cảm ơn anh Phatnq2002. Em áp dụng được rồi anh ah.
Cảm ơn anh nhiều lắm. Chắc rằng em còn làm phiền anh và mem khác nhiều đó ah!
Bao cao su siêu mỏng là loại bao cao su có độ dày trong khoảng 0.03-0.01mm, trong khi các bao cao su thường nhật là 0.06mm. Bao cao su siêu mỏng bắt đầu phổ quát trên thị trường khi các nhà sinh sản...
Bật mí cho các chàng top các loại condom siêu mỏng tốt nhất