Đánh giá chủ đề:
  • 1 Votes - 5 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Code lấy một field trong query ra textbox trong Access
#21
Cảm ơn tất cả mọi người đã giúp đỡ!
Sau bao ngày vất vả mình đã hoàn thành file quản lý vật tư theo y/c đã đề ra.
Có thể cách làm của mình không tốt lắm, nếu bạn nào cần tham khảo xin cứ gửi mail về canhcfc@gmail.com mình sẵn sàng chia sẻ. Thân! 015
Chữ ký của canhcfc Xin chào, mình là canhcfc, Tham gia http://thuthuataccess.com/forum từ ngày 24-09 -14.
Reply
Những người đã cảm ơn
#22
(13-10-14, 12:20 PM)canhcfc Đã viết: Chào mọi người
Mình có 1 file access trong đó có query tên Qdanhsach & textbox tên textbox1 trong form1
trong query Qdanhsach có field tên 1, 2, và 3
Mình muốn lấy giá trị của field 3 của mẫu tin đầu tiên đưa vào textbox1 của form1
Mình viết code như sau nhưng bị lỗi, mọi người giúp mình 040

Private Sub Form_Load()
Dim db As dao.Database 'khai bao bien db va bien rs
Dim rs As dao.Recordset

'set du lieu cho bien db & bien rs
Set db = CurrentDb 'db = CSDL hien tai
Set rs = db.OpenRecordset("Qdanhsach") 'set bien rs = query Qdanhsach

'di chuyen len mau tin dau tien
If rs.RecordCount > 0 Then
rs.MoveFirst

With rs
Textbox1.Text = .Fields("3") ' dua gia tri field 3 vao textbox1
End With
End If

End Sub

bỏ cái .Text là ok bạn

With rs
Textbox1= .Fields("3") ' Thằng access khong xài .text
End With


hoặc giống như noname

Me.Text0.SetFocus
Me.Text0.Text = rs.Fields("3")
Chữ ký của thucgia Hix, Access quả nhiên lợi hại !!!! http://vibigaba.esy.es/
ღღღღღTài sản của thucgia (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Hàm] Nhờ gở khó về hàm DLookup trong câu lệnh VBA phungminhluan 3 105 13-10-17, 07:24 PM
Bài mới nhất: phungminhluan
  [Thủ Thuật] Lọc điều kiện theo nhiều dòng trong 1 Listbox hoặc nhiều Listbox ongke0711 11 1,503 23-09-17, 04:54 PM
Bài mới nhất: ongke0711
  Làm sao chạy được code cả trong access 32 bit và access 64 bit haquocquan 1 141 12-09-17, 11:15 PM
Bài mới nhất: maidinhdan
  Hướng Dẫn Tư vấn import data(đuôi csv) vào file access nguồn subasatran 4 347 01-09-17, 03:20 PM
Bài mới nhất: subasatran
  Xin file demo theo yêu cầu, tùy biến các query theo câu lệnh SQL Đình Phán 12 527 19-08-17, 07:08 AM
Bài mới nhất: cpucloi

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ