Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.
Try If d.ditems.Count > 0 Then Dim foo As String Dim foo1() As String Dim item As ListViewItem lvfoo.Items.Clear() 'For Each foo In d.ditems foo1 = foo.Split("|") item = New ListViewItem(foo(0)) Me..Items.Add(item) item.SubItems.Add(foo(1)) item.SubItems.Addfoo(2)) 'item = Nothing Next End If Catch ex As Exception SystemException(ex.ToString) End Try
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.