第一次用VB连ACCESS数据库~谁能告诉我怎么连。。我是菜鸟 能一步一步教我吗~先加载什么 然后怎么连。。。怎么写连接代码。。。代码放在哪??
參考答案:在工程里引用microsoft activex data objects 2.7 library
Dim cn As New ADODB.Connection, rs1 As New ADODB.Recordset, sql As String '在通用声明里定义,其中cn是连接对象,rs1是记录集,sql是查询语句
Private Sub Form_Load()
cn.Open "provider=microsoft.jet.oledb.4.0;data source=" + App.Path + "\数据库名.mdb" + ""
sql = "select * from 表名"
rs1.Open sql, cn
rs1.MoveFirst
Do While Not rs1.EOF
Combo1.AddItem rs1("字段名")
rs1.MoveNext
Loop
rs1.Close
End Sub
上面的是打开数据库进行查询,并将查询结果写入列表框
不清楚的留言给我,发一个可以运行的程序给你参考