ListView 进行数据绑定

来源：百度知道 编辑：UC知道 时间：2024/04/28 02:02:37
我做的这个模块想使用ListView来实现数据的显示，因为其他的模块都有类似的功能，我想写一个公共的方法来实现这一功能
具体做的时候有一点不知道怎么实现。
就是用循环将数据源中的数据导入的时候，一般我会使用While(dataReader.Read())
{}然后对应不同的数据字段，加入相应的值，但是，由于现在写的是公共方法，传进来的参数只有个数据表的名字，在While（）里面无法进行相应的字段的插入，难道要写双重循环么？
我对循环学的不精，望老师具体指点这个过程怎么实现，谢谢老师
其中"dr["BookRemain"].ToString ( ) " 怎么得到我不是很清楚
功能具体要求是 给出一个数据表作为参数，然后绑定这个数据表到 listview
希望能得到具体代码，谢谢

'本人为这个花了几个小时，专门编了一个通用的函数，呵呵，也算花了不少心思吧.
'该函数运行非常正常，且方便有效。现将关键代码给你
'虽然你给的分实在配不上我这段代码，也就算了吧，谁叫我是好人呢

Private Sub Form_Load()
On Error GoTo ErrProceed

Dim ObjConnTmp As New ADODB.Connection, DataSource As String

DataSource = "数据库名"
ObjConnTmp.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & DataSource & ";"
ObjConnTmp.Open

Dim ObjTmpRs As New ADODB.Recordset

Set ObjTmpRs.ActiveConnection = ObjConnTmp
ObjTmpRs.CursorType = adOpenDynamic
ObjTmpRs.LockType = adLockOptimistic '设置游标类型
StrTmpSQL = "Select * from 数据库表名"
ObjTmpRs.Open StrTmpSQL

FrmMain.ListView1.View = lvwReport
FrmMain.ListView1.ColumnHeaders.Clear
Call ModListView.SubListViewHeader(FrmMain.ListView1, ObjRsTmp) '加标题

FrmMain.ListView1.ListItems.Clear<