跪求：怎么将ACCESS2000中的某段数据显示在VB TEXT里 - 编程论坛

#2

jzm08372012-10-05 15:09

各位高手，帮忙啊

#3

Artless2012-10-05 15:11

ado

#4

jzm08372012-10-05 16:07

我只要其中一段，不要全部数据库，不知道怎么弄

#5

wxflw2012-10-06 20:28

如果你是需要表里的一个字段下的所有记录给你个参考
希望对你有帮助
Do While Not Adodc1.Recordset.EOF
Combo1.AddItem Adodc1.Recordset.Fields("区域")
Adodc1.Recordset.MoveNext
Loop
'===================
Do While Not Adodc3.Recordset.EOF
Combo3.AddItem Adodc3.Recordset.Fields("房屋类型") & ""
Adodc3.Recordset.MoveNext
Loop
上面一段是将一个表里“区域”字段下的所有查询到的记录添加到combo1中！你参考一下！
下面一段也是同理!
再给你一个代码参考一下！是把表中某一条记录中的一个字段下的一个记录显示到指定text中
= adCmdText
Adodc2.RecordSource = "select * from czfy where 区域 = '" & Combo1.Text & "'"
Adodc2.Refresh
text1.text = Adodc2.Recordset.Fields("区域") & ""
把查询到的区域显示在text1中

#6

jzm08372012-10-07 18:26

谢谢，我试试看