Chủ đề: Đưa nhiều record vào một Unbound
-
09-16-2009, 07:32 PM #1
Junior 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:
- Cập nhật phiên bản mới cho chương trình Access?
- tìm tên khách hàng và hiển thị tất cả các dữ liệu liên quan lên form và subform
- Làm cách nào khi nhập phát hiện dữ liệu đã có trong table khác
- Nút OfficeLink bị disable
- Lấy ngày và giờ trên máy như thế nào?
- Gán nút lệnh cho phím chức năng.
- xin chào mọi người nhờ mọi người giúp mình vấn đề tìm theo ngày nhập vào được không?
- [Hỏi] Xếp hạng theo điểm bằng Update Query
- Chọn 1 record trong listbox để insert vào textbox trong 1 form khác
- Cách tính tỷ lệ giảm trừ % trong 1 danh sách có nhiều người
-
09-16-2009, 08:26 PM #2
Junior 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 #3
Junior 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 đôn dên là sản phẩm tương trợ dục tình được người dùng tại Việt Nam ưa chuộng. Hiện tại trên thị trường sản phẩm này có rất nhiều dòng với mẫu mã đa dạng. Dưới đây là Top 5 bao cao su đôn...
Bao cao su đôn dên X78PM gai toàn thân để làm mới cuộc vui