Recorrer Variables

[otreblanc]

El modulo esta asi:

Código ASP:

Module modulo1
Public var1 As Boolean
Public var2 As Boolean
...
Public var10 As Boolean
End Module
 

El formulario esta asi:

Código ASP:

Private Sub formulario1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
for each variable1 in modulo1
variable1=false
next
End Sub
 

Como podria utilizar la estructura FOR EACH para asignarle a las 10 variables del modulo algun valor?? (para evitar estar poniendo: var1=false, var2=false, etc)