Changing a variable value into a variable name (1 Viewer)

[Treason]

Assuming this:

Dim bln1Up, bln2Up, bln3Up as Boolean

Lets say I want to change one of those boolean values based on the middle character... for example

Private Sub Whatever()
Dim AddKey as Integer
        If ("bg" & AddKey & "Up") = True Then
            Call Correct
            ("bg" & AddKey & "Up") = False
        Else
            Call inCorrect
        End If
End Sub

I want to set bln1Up = True if AddKey = 1...
or set bln2Up = True if AddKey = 2 etc..

Basically I am trying to change a variable value into a variable name...

If Addkey = 1
I want ("bg" & AddKey & "Up") = True to mean bg1up = True


What am I doing wrong?

 

[modest]

Not sure that you can do that. It's comparing a string to a value. There is a way to delete and insert lines of codes in a module, but that would be too extreme for what you need. Also, you should probably distinguish what data types the first two variables are (to spead up processing time) right now they're just variants and the last one is the boolean.


**Edit:
Use the array suggestion below. It will be easier and would probably suit your needs better.

 

[tkpstock]

Why not just use an array?

Dim blnUp(3) as Boolean
Dim AddKey as Integer
If blnUp(AddKey) = True Then ... Else ... End If

Also, you do know that the following code only makes the third variable (bln3up) a boolean variable? The others would be variants.

Dim bln1Up, bln2Up, bln3Up as Boolean

To properly declare them, try

Dim bln1up as Boolean, bln2up as Boolean, bln3up as Boolean

 

[Treason]

whoa, thanks Tom I didnt catch that declare error

I thought to use arrays, but for some reason I thought Arrays are not available in Access97.

Thanks for the advice guys