Como ponerle el foco a un item del list

[Judgement]

Saludos, para realizar lo que necesitas puedes usar la propiedad ListIndex del objeto List.

Código:

Private Sub Command1_Click()
    List1.ListIndex = 1
End Sub

Por ejemplo si tienes tu lista con A, B, C

Código:

Private Sub Form_Load()
    With List1
        .AddItem "A"
        .AddItem "B"
        .AddItem "C"
    End With
End Sub

Y deseas seleccionar "B" en tu List

Código:

Private Sub Command1_Click()
    List1.ListIndex = 1
End Sub

Seleccionar "A"

Código:

Private Sub Command2_Click()
    List1.ListIndex = 0
End Sub

Espero que te sea de utilidad .