How to Loop through Listview items

[Mr_P]

I need some kind of loop, I think, to put into a variable for inclusion in access db. The problem I have at the minute is that with the code I am using, it gets the first value and if I click on another item, it retains the old value and dosen't update with new value. I need to get the items in the listview not the selectedItems.

How can I create a loop that will store the values from selected items. Thanks

msg = CStr(lvSelectedItems.Items.Count)

        If CDbl(msg) > 0 Then

            'With lvSelectedItems.Items

            For Each item As ListViewItem In Me.lvSelectedItems.Items

                Dim username As String = lvSelectedItems.Items.Item(0).Text
                Dim session As String = lvSelectedItems.Items.Item(0).SubItems.Item(1).Text

                output = username + " : " + session

            Next
            MessageBox.Show(output)

            'End With