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

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

2024-06-01 00:16:21

'没什么思路,就是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
戏子人生。

2024-06-01 00:27:36

VB本身提自动化功能可以读写EXCEL表,其方法如下: 1、在工程中引用Microsoft Excel类型库: 从
追问
谢谢,你的回答,我是在用ACCESS做的软件,有个查询功能不会做!