non so se ho capito, provo:
codice:
Private Sub Form_Load()
List1.AddItem "zero"
List1.AddItem "uno"
List1.AddItem "due"
List1.AddItem "tre"
List1.AddItem "quattro"
List1.AddItem "cinque"
List1.AddItem "sei"
List1.AddItem "sette"
List1.AddItem "otto"
List1.AddItem "nove"
List1.AddItem "dieci"
List1.AddItem "undici"
List1.AddItem "dodici"
List1.AddItem "tredici"
List1.AddItem "quattordici"
List1.AddItem "quindici"
List1.AddItem "sedici"
List1.AddItem "diciassette"
List1.AddItem "diciotto"
List1.AddItem "diciannove"
List1.AddItem "venti"

List1.ListIndex = 16
End Sub
intendevi questo?