Referenced Values

[fredz]

With repetitive data, sometimes I "build" my references via VBA.



For referencing table field names, I can use rst.Fields("name")
Example: A table with fields for PhoneHome, PhoneWork, PhoneFax
I can reference them by rst.Field("Phone" & strType)
Where strType is a variable set to "Home" or "Work" or "Fax"

For referencing controls on a form, I can use Me("name")
Example: A form with text controls for PhoneHome, PhoneWork, PhoneFax
I can reference them by Me("Phone" & strType)
Where strType is a variable set to "Home" or "Work" or "Fax"

But if I have dimmed variables (not fields or form controls),
How can I reference them via VBA?
Example:
Dim Appt0800 as String
Dim Appt0930 as String
Dim Appt1300 as String
Dim Appt1430 as String

If I have a variable strTime = "0930"
How can I reference the variable named Appt0930?

I Hope This Makes Sense
Thanks,
Fred

[amrut]

Dim Appt as String
Appt="Appt" & strTime
If the value of strTime changes or those values belong to recordset, you can loop through concatenating them with Appt to perform further calculations
Appt=""
Appt="Appt" & rst.Fields("strTime")
Hope this helps.

[fredz]

Thank you Amrut, but I don't think your suggestion works.

Assume I have a variable named Appt0930 with a value of "Smith"
and a variable named strTime with a value of "0930".

If I build a statement like, "Appt" & strTime,
that gives me a string with the value of "Appt0930", but what I want is to retrieve the value of "Smith" ?

The following statement is FALSE
"Appt" & strTime = "Smith"

Fred

[hapm]

Variable names shouldn't be used to differntiate between values. It is possible with Eval, but I don't suggest you to go this way!!! Use collections instead. They are for this purpose and allow you to specify a String as the key for the values you store in it.

[amrut]

What I have mentioned is only a concept. You have to change/select the variables to get the concept working or may be I have not understood your exact problem. What are your fields ? What do you want achieve in above code ? Can you post your code for this part or event ? Further, to get more precise help from experts , I would suggest you to mention your requirement with reference to the table/fields in your database.

[fredz]

I didn't explain my problem very well, I apologize.
But, I think I found my solution.
There already is a built-in collection of defined variables, it is called TempVars()

So, If I have a variable named Appt0930 (with a value of "Smith") and another variable named strTime (with a value of "0930"), then
I can refer to TempVars("Appt" & strTime) and retrieve the value of "Smith".

Thank You.
Fred