问个关于数据库的问题！

Question

请问各位大虾：数据库连接在VB里怎么实现啊？

Answer 1

先要引用:Microsoft ActiveX Data Object 2.0 Library
这是一个连接ACCESS数据库的例子:
Dim db As ADODB.Connection
Dim rs As ADODB.RecordsetPrivate Sub Form_Load()
  Set db = New Connection
  db.CursorLocation = adUseClient
  db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\data.mdb;Persist Security Info=False;"
  Set rs = New Recordset
  strsql = "select * from table"
  rs.Open strsql, db, adOpenDymanic, adLockBatchOptimistic
End Sub

Answer 2

http://expert.csdn.net/Expert/topic/2391/2391193.xml?temp=.2759516