I am trying to fill a ListView control following the Groups example in chapter 7 (pages 140 and 141) and keep getting the following error message:

"Object reference is not set to an instance of the object'

The ListView control will only contains one field which will be used to fill the parameter to obtain and view a specific record. Since I use only one field, I do not use the code regarding sub items. My code is as shown below:

Private objDataSetStaff As DataSet (Declared at the form level)

Private Sub FillSearchList()
'Declare variables...
 Dim objListViewItem As New ListViewItem

'Initialize a new instance of the data access base class...
 Using objData As New WDABase
   Try
     objData.SQL = "usp_SearchName"
     objDataSetStaff = New DataSet
     objData.FillDataSet(objDataSetStaff, "Staff")

    'Clear previous items...
     lstSearch.Items.Clear()

    'Process all rows...
     For intIndex = 0 To objDataSetStaff.Tables
        ("tStaff").Rows.Count - 1

        'Create new listview item...
         objListViewItem = New ListViewItem
        'Add the data to the listview item...
         objListViewItem.Text = objDataSetStaff.Tables("tStaff").Rows
             (intIndex).Item("DisplayName")

        'Add the ListView items to the listview control...
         lstSearch.Items.Add(objListViewItem)
     Next
    'Reset the selected index...
     lstSearch.SelectedIndex = -1

     Catch ex As Exception
        MessageBox.Show(ex.Message, "Employee Database")
   End Try
End Using
objListViewItem = Nothing
End Sub

I got the ListView to show the items but, each of the items also looks like this "ListViewItem: {Text from the field}"

I can't figure out how to strip the extraneous text or change my code so that it doesn't show. Here's my code:

    Private Sub LoadSearch()
        'Declare variables...
        Dim objListViewItem As New ListViewItem

        'Initialize a new instance of the data access base class...
        Using objData As New WDABase
            'Get all employees into a DataReader...
            objData.SQL = "usp_SearchName"
            objData.InitializeCommand()
            objData.OpenConnection()
            objData.DataReader = objData.Command.ExecuteReader
            'See if any data exists before continuing...
            If objData.DataReader.HasRows Then
                'Clear previous items...
                lvwSearch.Items.Clear()
                'Process all rows...
                While objData.DataReader.Read
                    'Create new listview item...
                    objListViewItem = New ListViewItem
                    'Add the data to the listview item...
                    objListViewItem.Text = objData.DataReader.Item("DisplayName")
                    objListViewItem.Tag = objData.DataReader.Item("DisplayName")
                    'Add the ListView item to the ListView control...
                    lvwSearch.Items.Add(objListViewItem)
                End While
            End If
            objData.DataReader.Close()
        End Using
        'Cleanup...
        objListViewItem = Nothing
    End Sub

Set a breakpoint on this line of code:

objListViewItem.Text = objData.DataReader.Item("DisplayName")

and query the results of objData.DataReader.Item("DisplayName") to see what it displays.

Thearon:

Thanks for the reply.

I follwed your suggestion and objListViewItem showed correctly. I filled a Label control and it came out exactly as on the control. The result should be "John J Jones" and thr ListViewItems as well as the label show as "ListViewItem: {John J Jones}".

I'm at a loss.