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

来源:百度知道 编辑:UC知道 时间:2024/07/03 01:05:53
比如在text2.text中显示我数据库中的一个表(Info)中字段满足“中国”的那个字段?表名:info, 字段名"国名",有一条记录是"中国",把"中国"两个字显示在textbox里

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

Text2.DataField = "国名"

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

先在工程中引用 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

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