Dim Question

[tgmoon]

If, for example i'm writing the following code:-

Dim EG1 as Boolean
Dim EG2 as Boolean
Dim EG3 as Boolean

EG1 = ToggleButton1.Value
EG2 = ToggleButton2.Value
EG3 = ToggleButton3.Value

But i've got EG's going up to EG30..... do I need to put each and everyone of them, or is there a quick way of doing it, so the codes isn't so long?

 

[SkipVought]

Hi,

How about using an array?

    Dim EG(1) As Boolean, i As Integer
    
    For i = 0 To 1
        EG(i) = Me.Controls("ToggleButton" & i + 1).Value
    Next

Skip,

_{[red]Be Advised![/red] For those this winter, caught in Arctic-like calamity, be consoled...
Many are cold, but few are frozen!}