Problema con For Each

[alfega]

...poder comparar los resultado con un tabla y ver las respuestas correctas

lo que recibo por post es esto:

1: A
2: B
3: C
4: A
5: C
6: C
7: D
8: B
9: D
10: B
11: D
12: C
13: A

(tb lo probe con get y recibo lo mismo... nose porq' se desordena despues con el for each)

...estaba pensando en hacer algo asi como... pero nose como hacerlo

For Each elemento In Request.Form
Redim Preserve pregunta(I), respuesta(I)
pregunta(I) = elemento
respuesta(I)= Request.Form(elemento)
I = I + 1

select numero_pregunta, opcion_pregunta, pregunta_correcta from juego_repuestas where numero_pregunta=pregunta(1) and opcion_pregunta=respuesta(1)

Next


asi voy creando una matriz para guardar el resultado y mostrarlos por pantalla