本文介绍了Listview项目在每次加载后随机自动增加有什么问题的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧! 问题描述 Sub loadlistview() ListView1.Items.Clear() ListView1.Columns.Clear( ) Me .ListView1.View = View.Details Me .ListView1。 GridLines = True Dim conn As 新 SqlConnection( Data Source = localhost; Initial Catalog = TrackingUnitsInventorySystem; Integrated Security = True) conn.Open() ListView1.Items.Clear() ListView1.Columns.Clear() Dim cmd As 新 SqlCommand( SELECT * from vUnit,conn) cmd.Co mmandType = CommandType.Text Dim reader As SqlDataReader = cmd.ExecuteReader() Me .ListView1.Columns.Add( IMEI No ) Me .ListView1.Columns( 0 )。宽度= 150 Me .ListView1.Columns.Add( 状态) 我 .ListView1.Columns( 1 )。宽度= 100 我。 ListView1.Columns.Add( Category) 我 .ListView1.Columns( 2 )。Width = 100 Me .ListView1.Columns.Add( Origin) Me .ListView1 .Columns( 3 )。宽度= 150 我 .ListView1.Columns.Add( 保修) Me .ListView1.Columns( 4 )。宽度= 150 我 .ListView1.Columns.Add( PurchaseDate) Me .ListView1.Columns( 5 ).Width = 150 我 .ListView1 .Columns.Add( 公司) 我 .ListView1.Columns( 6 )。宽度= 100 Me .ListView1.Columns.Add( PurchaseOrder) Me .ListView1.Columns( 7 )。宽度= 150 我 .ListView1.Columns.Add( AlternateCode) Me .ListView1.Columns( 8 )。宽度= 100 我 .ListView1.Columns .Add( InnvoiceNo) Me .ListView1.Columns( 9 )。宽度= 100 我 .ListView1.Columns.Add( 备注) 我 .ListView1.Columns( 10 )。宽度= 100 我 .ListView1.Columns.Add( 总单位数) 我 .ListView1 .Columns( 11 )。宽度= 100 while reader.Read() Dim NewItem As 新 ListViewItem 使用 NewItem .Text = reader( IMEINo)。ToString 使用 .SubItems .Add(reader( Status)。ToString) .Add(reader( Category )。ToString) .Add(reader( Origin)。 ToString) .Add(reader( Warranty)。ToString) .Add(reader( PurchaseDate)。ToString) .Add(reader( Company)。ToString) .Add(reader( PurchaseOrder)。ToString) .Add(reader( AlternateCode)。ToString) .Add(reader( InnvoiceNo)。ToString) .Add(reader( 备注)。ToString) .Add(reader( 总计)。ToString) ListView1.Items.Add(NewItem) 结束 使用 结束 使用 结束 while reader.Close() conn.Close()NumberList() 结束 Sub 解决方案 Pfhew难以阅读。请在下次使用代码标签。 无论如何:我不知道是否有帮助,但我很确定 listview1.items.add(newitem)不应该在With语句中。 你也在调用 ListView1.Items.Clear() ListView1.Columns.Clear() 两次。 Sub loadlistview() ListView1.Items.Clear() ListView1.Columns.Clear() Me.ListView1.View = View.Details Me.ListView1.GridLines = True Dim conn As New SqlConnection("Data Source=localhost;Initial Catalog=TrackingUnitsInventorySystem;Integrated Security=True") conn.Open() ListView1.Items.Clear() ListView1.Columns.Clear() Dim cmd As New SqlCommand("SELECT * from vUnit", conn) cmd.CommandType = CommandType.Text Dim reader As SqlDataReader = cmd.ExecuteReader() Me.ListView1.Columns.Add("IMEI No") Me.ListView1.Columns(0).Width = 150 Me.ListView1.Columns.Add("Status") Me.ListView1.Columns(1).Width = 100 Me.ListView1.Columns.Add("Category") Me.ListView1.Columns(2).Width = 100 Me.ListView1.Columns.Add("Origin") Me.ListView1.Columns(3).Width = 150 Me.ListView1.Columns.Add("Warranty") Me.ListView1.Columns(4).Width = 150 Me.ListView1.Columns.Add("PurchaseDate") Me.ListView1.Columns(5).Width = 150 Me.ListView1.Columns.Add("Company") Me.ListView1.Columns(6).Width = 100 Me.ListView1.Columns.Add("PurchaseOrder") Me.ListView1.Columns(7).Width = 150 Me.ListView1.Columns.Add("AlternateCode") Me.ListView1.Columns(8).Width = 100 Me.ListView1.Columns.Add("InnvoiceNo") Me.ListView1.Columns(9).Width = 100 Me.ListView1.Columns.Add("Remarks") Me.ListView1.Columns(10).Width = 100 Me.ListView1.Columns.Add("Total Units") Me.ListView1.Columns(11).Width = 100 While reader.Read() Dim NewItem As New ListViewItem With NewItem .Text = reader("IMEINo").ToString With .SubItems .Add(reader("Status").ToString) .Add(reader("Category").ToString) .Add(reader("Origin").ToString) .Add(reader("Warranty").ToString) .Add(reader("PurchaseDate").ToString) .Add(reader("Company").ToString) .Add(reader("PurchaseOrder").ToString) .Add(reader("AlternateCode").ToString) .Add(reader("InnvoiceNo").ToString) .Add(reader("Remarks").ToString) .Add(reader("Total").ToString) ListView1.Items.Add(NewItem) End With End With End While reader.Close() conn.Close() NumberList() End Sub 解决方案 Pfhew that was difficult to read. Please use the code tags next time.Anyway: I don''t know if it helps but I''m pretty sure the listview1.items.add(newitem) should not be inside the With statement.You''re also callingListView1.Items.Clear()ListView1.Columns.Clear()twice. 这篇关于Listview项目在每次加载后随机自动增加有什么问题的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!
09-14 16:04