[VB6] Combo oltre 10 caselle

[OrcaAssassina]

Sto creando una combo molto grande, ho utilizzato quella della FORM2. ecco il codice

Turni.Clear

Turni.ColumnCount = 5
Turni.ListWidth = "6,5 cm"
Turni.ColumnWidths = "1 cm;1 cm; 1,6 cm; 0,5 cm; 1 cm"



rsRecordSet14.MoveFirst
i14 = 0
Do While Not rsRecordSet14.EOF
Me.Turni.AddItem rsRecordSet14![Tipo turno] & ""
Me.Turni.List(i14, 1) = rsRecordSet14![Giornata] & ""
Me.Turni.List(i14, 2) = rsRecordSet14![Tipo giornata] & ""
Me.Turni.List(i14, 3) = rsRecordSet14![Rigo Giornata] & ""
Me.Turni.List(i14, 4) = rsRecordSet14!Treno & ""
Me.Turni.List(i14, 5) = rsRecordSet14!Servizio & ""
Me.Turni.List(i14, 6) = rsRecordSet14![Località inizio codice] & ""
Me.Turni.List(i14, 7) = rsRecordSet14![Località inizio] & ""
Me.Turni.List(i14, 8) = rsRecordSet14![Località fine codice] & ""
Me.Turni.List(i14, 9) = rsRecordSet14![Località fine] & ""
rsRecordSet14.MoveNext
i14 = i14 + 1
Loop
'chiude il recordset
rsRecordSet14.Close

Fino a qui è tutto perfetto, e non mi da problemi.
Ora però devo aggiungere altri dati nella combo.

Me.Turni.List(i14, 10) = rsRecordSet14![Ora prescritta inizio] & ""
Me.Turni.List(i14, 11) = rsRecordSet14![Ora prescritta fine] & ""
Me.Turni.List(i14, 12) = rsRecordSet14![TP] & ""
Me.Turni.List(i14, 13) = rsRecordSet14![Macchina1] & ""

Dal 10 in poi va in errore, come se fosse limitata a soli 10 dati, cioè dallo 0 al 9, oltre va in errore

Sapete darmi conferma di questo????

C'è un modo per andare oltre, devo aggiungere altre 6 campi.

Ciao e grazieeeeeeeeeeeeeeee

[GioVesas]

Non mi torna, quale tipo di combo utilizzi? Nell'utilizzo di combo, in list ho sempre utilizzato un indice singolo, non (a,b)