Đá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
  Sử dụng Class Module và Kết nối dữ liệu SQL SERVER trong Access VBA lehongduc 43 17,376 18-12-16, 03:37 PM
Bài mới nhất: huuduy.duy
  Hướng Dẫn Enter xuống dòng trong textbox thanhquyt 2 107 18-12-16, 09:43 AM
Bài mới nhất: thanhquyt
  Lấy record từ tbl1 làm thành field trong tbl2. MinhnHang 5 164 13-12-16, 03:05 PM
Bài mới nhất: ongke0711
Photo [Thủ Thuật] Code chia sẽ hàng thừa Phung Duc 5 145 12-12-16, 04:25 PM
Bài mới nhất: ongke0711
Question [Help] Link tất các table trong một file.mdb bằng VBA MinhnHang 9 298 09-12-16, 06:11 PM
Bài mới nhất: maidinhdan

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ơ