e.Text, sqlparams) '实例化一个泛型集合 Dim mylist As New List(Of CardEntity) '将临时表转化为泛型集合 mylist = DataTolist.converToList(Of CardEntity)(table) Return mylist End Function '''调用无参数的查询操作 '''

''' 查询基本数据设定表中的最新信息 '''

''' 返回泛型集合 ''' Public Function SelectBasicData() As List(Of BasicDataEntity) Implements IDAL.IBasicData.SelectBasicData '定义数据库

连接字符串 Dim sql As String = "Select top 1 * from T_BasicData order by Date desc" '实例化临时表 Dim table As New DataTable '实例化sqlhelper类对象 Dim helper As New SQLHelper '调用sqlhelper类的查询方法，将查询到的信息放到临时表中 table = helper.ExecSelect(sql, CommandType.Text) '实例化一个泛型集合对象 Dim mylist As New List(Of BasicDataEntity) '将临时表转化为泛型集合 mylist = DataTolist.converToList(Of BasicDataEntity)(table) Return mylist End Function

四、总结：

SqlHelper真的很有用，期待与您下次更亲密的约会。

[机房合作]―SqlHelper我们又约了(三)

四、总结：