建议看看vb连接数据库和vb与excel编程方面的内容，很好实现的。论坛里很多这样的贴子。参考
http://bbs.pfan.cn/post-248326.html
http://bbs.pfan.cn/post-245401.html
http://bbs.pfan.cn/post-240746.html
这些都是我回答过的一些帖子，可能不很合适，但可供参考。

Option Explicit
Public dbBasic As ADODB.Connection
Public recCommSet As ADODB.Recordset
Public flag As Integer  '0=添加 1=查询 2=编辑


Private Sub Form_Load()
Set dbBasic = New ADODB.Connection
dbBasic.CursorLocation = adUseClient
dbBasic.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\基本信息库.mdb;"

Set recCommSet = New ADODB.Recordset
recCommSet.Open "select * from 通讯录 order by 姓名,电话", dbBasic, adOpenStatic, adLockOptimistic
Set grd_note.DataSource = recCommSet
End Sub