如何使用listview控件作为数据源?

letian_now 2006-03-21 01:50:58
谢谢.
...全文
213 点赞 收藏 12
写回复
12 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
letian_now 2006-03-23
呵,我已经实现了它作为数据源的功能.没有想象的复杂.
谢谢大家拉.
回复
flyingZFX 2006-03-22
ListView 没有数据源,只能你自己一点点的添加,不过,这样也非常方便,很有控件,灵活性强。
回复
liang80318 2006-03-22
它不能做为数据源使用,但是可以自行加上就是了
比方说,你查找出了记录集

with rsrecordset '循环记录集
while not.eof
inti=inti+1 '行数
listview.listitem.add,,,0 '增加新行
listview.listitem(inti).subitem(1)=rsrecordset.field(0) '写入记录
listview.listitem(inti).subitem(1)=rsrecordset.field(1)
listview.listitem(inti).subitem(1)=rsrecordset.field(2)
.movenext
wend
end with
这样就应该很详细了
回复
caitian6 2006-03-21
mark
回复
vansoft 2006-03-21
那就是一行行塞入数据库啊。

可以写个函数嘛。
回复
letian_now 2006-03-21
顶哈
回复
letian_now 2006-03-21
你说的是将 ListView1作为数据显示,我需要将 ListView1作为数据源啊

也就是说,将 ListView1中的每一列添加到数据库文件中
....
回复
ZOU_SEAFARER 2006-03-21
Private Sub Command1_Click()
Me.ProgressBar1.Max = Data1.Recordset.RecordCount
Totel = Data1.Recordset.RecordCount
Data1.Caption = Totel
Set Val = Data1.Recordset
Do While Val.EOF = False
Max = Max + 1
Me.ProgressBar1.Value = Max
With ListView1.ListItems.Add()
For intX = 0 To 4
If intX = 0 Then
.Text = Data1.Recordset.Fields(0).Value
Else
.SubItems(intX) = Data1.Recordset.Fields(intX).Value
End If
Next
Data1.Recordset.MoveNext
End With
Loop
End Sub
回复
letian_now 2006-03-21
我不太会使用listitem对象,不能将listview控件中的listitems对象作为数据源,你能解决吗?
回复
jobs002 2006-03-21
比如DataGrid,里面有个属性DataSource,可以作为数据源,当然了,这需要写各类来实现
=====================================
可以提示一下
dim lst as listitem
set lst=listview1.listitems.add()
具体参数我就不写了,实际上在数据库中里面的表的主键作index,内容作text
需要引用ADO.....
回复
letian_now 2006-03-21
怎么添加呢?给个例子好吗?
回复
jobs002 2006-03-21
需要一个一个的listitem添加
回复
相关推荐
发帖

1188

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2006-03-21 01:50
社区公告
暂无公告