在类模块中，这样定义了一个类
Imports System.Data
Imports System.Data.OleDb
Public Class DbHelper
Public Shared Function getConn() As OleDbConnection
Dim cnstr As String
cnstr = "Provider=Microsoft.Jet.OleDb.4.0;Data Source=" & Application.StartupPath & "\data.mdb"
Dim conn As New OleDbConnection
conn.ConnectionString = cnstr
conn.Open()
getConn = conn
End Function
End Class
然后再使用时，这样调用
Dim con As OleDbConnection
con = DbHelper.getConn()
。。。。。。
。。。。。。
发现可以连接和读取数据库，这是我第一次用vb.net类，现在还不会封装DataReader，DataAdapter 等，因为那些太复杂了，只走出了封装数据库连接的第一步，请各位对现有的代码进行指点，谢谢！