VB6.0 用VB从ACCESS里查询数据，将查询出来的数据以列表形式罗列出来！

Question

VB从ACCESS数据里查询，将符合查询条件的信息，以列表形式显示出来，假设查询“手机”有3个记录符合条件，将3条信息都显示出来！！谢谢了！回答的人可以以自己的例子将一下，将关键的思路讲清！谢谢！

Answer 1

'没什么思路，就是sql查询
'添加一个adodc1,一个datagrid1，一个text1，一个command1
'复制下面的代码，修改一下你的数据库地址和你的表名即可直接使用

Dim sqlstr As String

Private Sub Command1_Click()
Adodc1.RecordSource = "select * from [你的表名] where 手机='" & Text1.Text & "'"
Adodc1.Refresh
End Sub

Private Sub Form_Load()
sqlstr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=false;Data Source=你的mdb数据库地址"
Adodc1.ConnectionString = sqlstr
Adodc1.RecordSource = "select * from [你的表名]"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
End Sub

Answer 2

VB本身提自动化功能可以读写EXCEL表，其方法如下： 1、在工程中引用Microsoft Excel类型库： 从追问

谢谢，你的回答，我是在用ACCESS做的软件，有个查询功能不会做！