现在不想连接数据库,想自己添加静态数据,在窗体加载时调用它,但是报错?没有其它的方法
Private Sub ListRemove_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Dim item As New ListViewItem("item1", 0)
'item.Selected = True
'item.SubItems.Add("1")
'item.SubItems.Add("2")
'item.SubItems.Add("3")
'ListView1.Items.AddRange() Addlist()//调用的方法
End Sub
Public Sub Addlist()
Dim item(10) As ListViewItem
For i As Integer = 0 To 10 - 1
item(i) = New ListViewItem(i)
Next
ListView1.Items.AddRange(item)//这句报错未将对象引用到实例 End Sub
Private Sub ListRemove_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Dim item As New ListViewItem("item1", 0)
'item.Selected = True
'item.SubItems.Add("1")
'item.SubItems.Add("2")
'item.SubItems.Add("3")
'ListView1.Items.AddRange() Addlist()//调用的方法
End Sub
Public Sub Addlist()
Dim item(10) As ListViewItem
For i As Integer = 0 To 10 - 1
item(i) = New ListViewItem(i)
Next
ListView1.Items.AddRange(item)//这句报错未将对象引用到实例 End Sub
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货