VB中怎样在文本框里显示数据库表中的某一条记录的字段

Question

比如在text2.text中显示我数据库中的一个表(Info)中字段满足“中国”的那个字段？表名：info, 字段名"国名",有一条记录是"中国"，把"中国"两个字显示在textbox里

现在只写到这样
Private Sub Form_Load()

Text2.DataField = "国名"

End Sub
谢谢你回答，按你的做好大半了，最后怎么将select的结果放入text2.text?
是text2.text="select 国名 from info where 国名='中国'"这样还是怎么样呀？？

Answer 1

先在工程中引用 microsoft..........object2.5 library
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset

Private Sub Form_Load()
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Info.mdb;Persist Security Info=False"
rs.Open "select * from Info where 国名='中国'", cnn, adOpenKeyset, adLockOptimistic, -1
Set Text1.DataSource = rs
Text1.DataField = "国名"
End Sub本回答被提问者采纳

Answer 2

首先数据库连接
第二去数据库查询select 国名 from info where 国名="中国"
把查找将恶果填充textbox