我看过文件..主要是因为模块module1里面的连接SQL命令有问题...
把
Public Function ConnectString() _
As String
'returns a DB ConnectString
ConnectString = "FileDSN=studentinfo.dsn;UID=sa;PWD="
End Function
红色字的那句换为
ConnectString = "driver={SQL Server};server=(local);uid=sa;pwd=;database=student"就可以了..