大佬教程收集整理的这篇文章主要介绍了从数据库接收数据时如何设置Listview,大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
do while Not rs.EOF
ListRecenttransactions.Items.Add(rs.FIElds("BetID").value)
ListRecenttransactions.Items.Add(rs.FIElds("fightnumber").value)
ListRecenttransactions.Items.Add(rs.FIElds("Betoption").value)
ListRecenttransactions.Items.Add(rs.FIElds("amount").value)
ListRecenttransactions.Items.Add(rs.FIElds("transactionDate").value)
ListRecenttransactions.Items.Add(rs.FIElds("barcode").value)
i = i + 1
rs.MoveNext()
Loop
@H_502_0@结果如下
@H_502_0@
首先,在设计视图中设置列。
在代码中调用 .beginupdate
。这可以防止 ListView 在调用 .Endupdate
之前重新绘制。这会加快速度,因为重新绘制屏幕是一个缓慢的过程。
接下来,创建一个新的 List(Of T)
来保存列表项。
在循环的每次迭代中,我们创建一个新的列表项并根据记录集数据设置其属性。设置属性后,列表项将添加到 List(Of ListViewItem)
(而不是 ListView
),然后我们移至下一条记录。
在循环之后,整个列表被添加到带有 Items
的 ListView
的 .AddRange
集合中。由于 .AddRange
期待列表中的数组调用 .ToArray
。
最后,在 .Endupdate
上调用 ListView
。这是数据实际上一次全部出现在 ListView
中的地方,因此屏幕只需重绘一次。
我真的希望您停止使用 ADODB,并通过 ADO.net 进入本世纪。
Private Sub LoadListView()
listRecenttransactions.beginupdate()
Dim lst As New List(Of ListViewItem)
Do While Not rs.EOF
Dim li As New ListViewItem
li.Text = rs.Fields("BetID").value)
li.SubItems.Add(rs.Fields("Fightnumber").value)
li.SubItems.Add(rs.Fields("BetOption").value)
li.SubItems.Add(rs.Fields("amount").value)
li.SubItems.Add(rs.Fields("transactionDate").value)
li.SubItems.Add(rs.Fields("Barcode").value)
lst.Add(li)
rs.MoveNext()
Loop
listRecenttransactions.Items.AddRange(lst.ToArray)
listRecenttransactions.Endupdate()
End Sub
以上是大佬教程为你收集整理的从数据库接收数据时如何设置Listview全部内容,希望文章能够帮你解决从数据库接收数据时如何设置Listview所遇到的程序开发问题。
如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。