Combinare array per due valori

[Pierhagi]

Ciao

non conosco bene gli arrary però vorrei tentare una modifica. Ho questo array funzionante:

Dim valori_1, valori_1_del, valori_1Array, valore_1_ext
valori_1 = Trim(valori_1_v)
valori_1_del = Replace(valori_1, ";", ",")
valori_1_del = valori_1_del & ","
valori_1Array = Split(valori_1_del, ",")
Dim i
i = 0
For i = 0 To UBound(valori_1Array) - 1
valore_1_ext = valori_1Array(i)

a questo array lo utilizzo per una multiselezione di checkbox x ogni casella che spunto inserisco il valore di valore_1_ext in un nuovo record.

Ora mi interessa inserire anche un secondo valore.
...suppongo che l'array per il secondo valore sia questo:

Dim valori_2, valori_2_del, valori_2Array, valore_2_ext
valori_2 = Trim(valori_2_v)
valori_2_del = Replace(valori_2, ";", ",")
valori_2_del = valori_2_del & ","
valori_2Array = Split(valori_2_del, ",")
'Dim i
'i = 0
'For i = 0 To UBound(valori_2Array) - 1
'valore_2_ext = valori_2Array(i)

La combinazione dei due nel ciclo For come sarà?

Ho provato come sotto ma non inserisco secondo valore:

Dim i
i = 0
For i = 0 To UBound(valori_1Array) - 1 & To UBound(valori_2Array) - 1
valore_1_ext = valori_1Array(i)
valore_2_ext = valori_2Array(i)

[lucavizzi]

Se hai un array bidimensionale, devi annidare i cicli "for" per scorrere i due indici:

for i=0 to ubound(array)
    subArray=array(i)
    for j=0 to ubound(subArray)
        '.......
    next
next

[Pierhagi]

non è bidimensionale ma dinamico, cmq ho risolto così:

<%
    Dim squadre_1_v, i
    squadre_1_v = Array(rs("nome_squadra"))
    i = 0
            
    For i = 0 To UBound(squadre_1_v)
%>
    <select name="id_squadra_1" id="id_squadra_1">
       <option value=""></option>

       <% While Not rs.eof %>
       
       <option value="<%=rs("id_squadra")%>" selected>
          <%=rs("nome_squadra")%>
       </option>
       
       <%
            'Vai al prossimo
            rs.MoveNext
            Wend
        %>
    </select>
<%Next%>