Đá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
  Unicode trên cửa sổ viết code VBA (IDE) lehongduc 0 109 10-12-17, 09:49 AM
Bài mới nhất: lehongduc
  [Hỏi] Cập nhật thông tin từ Textbox của UnBound Form vào Listbox pherotao 4 179 09-12-17, 11:13 AM
Bài mới nhất: pherotao
  [Hỏi] câu lệnh where trong VBA xiketuan 1 62 06-12-17, 03:45 PM
Bài mới nhất: ongke0711
  [Hỏi] Dữ liệu trong mainForm và subForm pherotao 32 1,024 02-12-17, 03:00 PM
Bài mới nhất: pherotao
  Hướng Dẫn Lọc điều kiện trong Dcount mrsiro 2 106 30-11-17, 12:41 PM
Bài mới nhất: paulsteigel

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ơ