Puedes hacerlo de dos formas:
1-
'Lista es el nombre del control listview
lista.HideSelection = False
lista.ListItems(lista.ListItems.Count).Selected = True
2-
'Lista es el nombre del control listview
Dim item_Lista As ListItem
lista.HideSelection = False
Set item_Lista = lista.ListItems(lista.ListItems.Count)
item_Lista.Selected = True
