vb.net 封装数据库操作类（自用）

首先定义一个接口：

Public Interface IDAL
    Property Connection As IDbConnection
    Sub Close()
    ''' <summary>查询并返回一个表。</summary>
    Function Table(cmdText As String) As DataTable
    ''' <summary>查询并返回一个表。</summary>
    Function Table(cmdText As String, ParamArray params As Object()) As DataTable
    ''' <summary>执行并返回受影响的行数。</summary>
    Function Exec(cmdText As String) As Integer
    ''' <summary>执行并返回受影响的行数。</summary>
    Function Exec(cmdText As String, ParamArray params As Object()) As Integer
    ''' <summary>查询并返回第一行。</summary>
    Function DataRow(cmdText As String) As DataRow
    ''' <summary>查询并返回第一行。</summary>
    Function DataRow(cmdText As String, ParamArray params As Object()) As DataRow
    ''' <summary>查询并返回第一个数据。</summary>
    Function Query(cmdText As String) As Object
    ''' <summary>查询并返回第一个数据。</summary>
    Function Query(cmdText As String, ParamArray params As Object()) As Object
End Interface

实现接口：

Public MustInherit Class DAL : Implements IDAL, IDisposable
    Public Property Connection As IDbConnection Implements IDAL.Connection
    Public Sub C