If I Remove a ListItem, using a command button click event, how do I stop
the user clicking the delete button and removing the next Item in the list?

    E.g

    When the User Clicks the Delete Button, the following code is run

    Dim i as Integer

    lstvwPatients.ListItems.Remove lstvwPatients.SelectedItem.Index

    ' set listitems selected property to false
    With lstvwPatients
        For i = 1 To .ListItems.Count
            .ListItems.Item(i).Selected = False
        Next i
    End With

Is there a better way ?

Also, does Adding new ListItems change the selected property to True?

TIA

Under the ListView1_ItemClick Event this:
        Command1.Enabled = True

Under the Command1_Click Event this:
        If ListView1.SelectedItem Is Nothing Then Exit Sub
        Command1.Enabled = False
        ListView1.ListItems.Remove ListView1.SelectedItem.Index

hth,
s

Yes it does thanks