listveiw中我这样做为什么不对?
Me.lvSelect.View = View.DetailsMe.lvSelect.GridLines = True
Me.lvSelect.Columns.Add("姓名", 100, HorizontalAlignment.Left)
Me.lvSelect.Columns.Add("电子邮件地此", 200, HorizontalAlignment.Left)
Me.lvSelect.Columns.Add("昵称", 100, HorizontalAlignment.Left)
Me.lvSelect.Columns.Add("备注", 200, HorizontalAlignment.Left)
Dim dt As DataTable = DB.GetTable("Address")
Dim li As New ListViewItem
Dim i As Integer
For i = 0 To dt.Rows.Count - 1
li.SubItems.Clear()
li.SubItems.Add("ADNAME")
li.SubItems.Add("EMAIL")
li.SubItems.Add("ADNICK")
li.SubItems.Add("GNOTE")
li.ImageIndex = 0
Me.lvSelect.Items.Add(li)
Next
我这样做为什么读取不到数据库呢? --------------------编程问答-------------------- 错在哪?如何改?谢谢!急急急急急急急急! --------------------编程问答-------------------- Dim dt As DataTable = DB.GetTable("Address")
自己断点调试下 --------------------编程问答-------------------- Dim dt As DataTable = DB.GetTable("Address")
Dim li As New ListViewItem
Dim i As Integer
For i = 0 To dt.Rows.Count - 1
li.SubItems.Clear()
li.SubItems.Add(DataTable.Rows[i]["ADNAME"].ToString())
li.SubItems.Add(DataTable.Rows[i]["EMAIL"].ToString())
li.SubItems.Add(DataTable.Rows[i]["ADNICK"].ToString())
li.SubItems.Add(DataTable.Rows[i]["GNOTE"].ToString())
li.ImageIndex = 0
Me.lvSelect.Items.Add(li)
Next
--------------------编程问答-------------------- 不行啊?
Me.lvSelect.Items.Add(li)
未处理的“System.ArgumentException”类型的异常出现在 system.windows.forms.dll 中。
其他信息: 不能在多处添加或插入项“”。必须首先将其从当前位置移除或将其克隆。????
怎么改?我是新手 --------------------编程问答-------------------- Dim dt As DataTable = DB.GetTable("Address")
Dim li As ListViewItem
Dim i As Integer
For i = 0 To dt.Rows.Count - 1
li=lvSelect.Items.Add(DataTable.Rows[i]["ADNAME"].ToString())
li.SubItems.Add(DataTable.Rows[i]["EMAIL"].ToString())
li.SubItems.Add(DataTable.Rows[i]["ADNICK"].ToString())
li.SubItems.Add(DataTable.Rows[i]["GNOTE"].ToString())
li.ImageIndex = 0
Next
补充:.NET技术 , VB.NET