我需要一个用VB和access相结合的图书管管理系统源代码，急需，谢谢，我的邮箱是caojinmin008@126.com

给你一个VB链接Access的简单代码：

Dim DATA As Database
Dim Recordset As Recordset
Set DATA = Workspaces(0).OpenDatabase("C:\Data.mdb")
Set Recordset = DATA.OpenRecordset("number")
Recordset.MoveFirst
Do While Recordset.EOF = False
Data_temp(i) = Recordset.Fields(0).Value
Loop