Question

vb数据库中用select*form能查询到记录了 但是怎么把查到的记录显示到特定的表里

我没有接触过数据库，不会写代码。我能做出数据库里的表，现在也能用select查出来记录了，但是不知道怎么让这条记录显示出来。告诉我代码 ，假如 我的表的名字是A系统，查询的是B和C字段，能得到一条记录，这条记录包含E、F、G三个字段，我需要用3个textbox把这3个字段显示出来（就这一条属性）我该怎么写代码，就55分了 全给了
2楼的代码 中间有问题。rs_addjilu.Open sql, conn, adOpenKeyset, adLockPessimistic 提示说是没有为命令对象设置命令

Answer 1

你的意思是添加记录吧一个cmd三个text对吧
Private Sub Command1_Click()
Dim rs_addjilu As New ADODB.Recordset
Dim conn As New ADODB.Connection
Dim sql As String
conn.Open "provider=Microsoft.Jet.OLEDB.4.0; data source=" & App.Path & "\数据库名.mdb"
sql = "select * from A系统 where 主键字段='" & 要添加的主键字段的text.Text & "'"
rs_addjilu.Open sql, conn, adOpenKeyset, adLockPessimistic
If rs_addjilu.EOF Then
rs_addjilu.addnew
rs_addjilu.Fields(0) = Trim(Text1.Text)'字段1对应表1
rs_addjilu.Fields(1) = Trim(Text2.Text)
rs_addjilu.Fields(2) = Trim(Text3.Text)
rs_addjilu.Fields(3) = 0

rs_addjilu.Update
MsgBox "添加读者信息成功!", vbOKOnly, ""
rs_addjilu.Close
Else
MsgBox "主键字段重复!", vbOKOnly + vbExclamation, ""
主键字段Text.SetFocus
rs_addjilu.Close
Exit Sub
End If
End Sub
大概思路是这样

Answer 2

VB 与数据库,要是你没有接触过,这说起来就有难度了,要从与数据库连接开始,一句两句说不完,这里有一个VB+ACCESS图书管理系统的实例,只要看会这个了,应该不差不多了,你先看吧,不明白的地方,可以发消息问我
http://dev.yesky.com/138/2557138_1.shtml
不算很难的,有点VB的基础应该能看得懂的

Answer 3

用adodc控件就用text1（i）.text=adodc1.Recordset.Fields（i） 'i=0 to 2
应用adodb的就用定义的ADODB.Recordset 如（Dim str As New ADODB.Recordset
Set str = New ADODB.Recordset
）就用Text1（i）.Text = str.Fields(i) 'i=0 to 2