Si, è possibile tramite la proprietà ListIndex.
Impostarla ha lo stesso effetto del Click.
prova questo codice in un Form con una Combo.
codice:
Private Sub Form_Load()
    Combo1.AddItem "elemento " & 1
    Combo1.AddItem "elemento " & 2
    Combo1.AddItem "elemento " & 3
    Combo1.AddItem "elemento " & 4
    Combo1.AddItem "elemento " & 5
    Combo1.AddItem "elemento " & 6
    Combo1.ListIndex = 3
End Sub
Ciao,