Troubles with global variables

**ADezii** · Aug 16 '07, 03:58 PM

Originally posted by RobH

I know its probably been asked a million times - however I can't seem to get any examples to work..

In Module1 I have a line: Global gvarMyEmpID As Integer

I then have an opening splash page for the logon process that has a drop down of the employees and an Enter Button

The Enter Button has some code that includes....
gvarMyEmpID = Me!AgentID.Valu e
SQLtxt = "UPDATE [Version Control] SET [Version Control].[Last Agent] = " & gvarMyEmpID & ";"
DoCmd.RunSQL SQLtxt

I then have the Opening Splash Page close and then the Menu appears - With a text box that has the gvarMyEmpID in the control source however all I get when I run the screen in Form View is "#Name?" in the box.

How can I use this variable in textboxes, Queries - in rowsources, and Event Procedure Code on other pages?

The Keyword Global is only used for backward compatability - use Public instead:
[CODE=vb]Public gvarMyEmpID As Integer[/CODE]
Public Variables cannot be used as a Control Source for a Control.
The areas in which they can use used are numerous and range from SQL Statements to code blocks, to Property values, etc.

**RobH** · Aug 16 '07, 04:27 PM

Originally posted by ADezii

The Keyword Global is only used for backward compatability - use Public instead:
[CODE=vb]Public gvarMyEmpID As Integer[/CODE]
Public Variables cannot be used as a Control Source for a Control.
The areas in which they can use used are numerous and range from SQL Statements to code blocks, to Property values, etc.

I tried that and then on the Menu page entered the following on the "On Load"

Me!Text22.value = gvarMyEmpID

And all i got was a 0 when it should have been a 2 - bing the ID of the staff member I logged in with.

Do I have to call the Module somehow??

**FishVal** · Aug 16 '07, 05:33 PM

Originally posted by RobH

I tried that and then on the Menu page entered the following on the "On Load"

Me!Text22.value = gvarMyEmpID

And all i got was a 0 when it should have been a 2 - bing the ID of the staff member I logged in with.

Do I have to call the Module somehow??

Hi, RobH.

I've tried an example and everything works fine with the following.

In public module "Module1"

Code:

Public intVar As Integer

in form module

Code:

Private Sub Form_Load()
    Me.Text0 = intVar
End Sub

Private Sub Text0_AfterUpdate()
    intVar = Me.Text0
End Sub

**RobH** · Aug 17 '07, 12:07 AM

Originally posted by FishVal

Hi, RobH.

I've tried an example and everything works fine with the following.

In public module "Module1"

Code:

Public intVar As Integer

in form module

Code:

Private Sub Form_Load()
    Me.Text0 = intVar
End Sub

Private Sub Text0_AfterUpdate()
    intVar = Me.Text0
End Sub

Ok I only have 1 module in modules and I have changed to as you have indicated..

In the Logon form 'Logon Button' I have

Code:

        intVar = Me.AgentID
        SQLtxt = "UPDATE [Version Control] SET [Version Control].[Last Agent] = " & intVar & ";"
        DoCmd.RunSQL SQLtxt

Now this does update the Vesion Control tbl correctly.. so the variable is working with-in the logon form..

In the Menu Form I have a text box which should display the ID no..

Code:

  Private Sub Form_Current()
    Me.Text22 = intVar
  End Sub

I have tried on this form both 'Private Sub Form_Load()' and 'Private Sub Text0_AfterUpda te()'

**ADezii** · Aug 17 '07, 02:17 AM

Originally posted by RobH

Ok I only have 1 module in modules and I have changed to as you have indicated..

In the Logon form 'Logon Button' I have

Code:

        intVar = Me.AgentID
        SQLtxt = "UPDATE [Version Control] SET [Version Control].[Last Agent] = " & intVar & ";"
        DoCmd.RunSQL SQLtxt

Now this does update the Vesion Control tbl correctly.. so the variable is working with-in the logon form..

In the Menu Form I have a text box which should display the ID no..

Code:

  Private Sub Form_Current()
    Me.Text22 = intVar
  End Sub

I have tried on this form both 'Private Sub Form_Load()' and 'Private Sub Text0_AfterUpda te()'

It seems that you are experiencing some very peculiar behavior with your Public Variable. Try changing the Declaration to:
[CODE=vb]Public intVar As Variant[/CODE]
NOTE: Let me know how you make out.

**RobH** · Aug 17 '07, 03:17 AM

Actually - I found the problem ...

I had further down in the coding another IF statement - That was allocating the variable properly..

It was while I was exporting the required modules to a seperate database so i could attach it that i can accross it.

Thanks Guys.

Hey If I want to store the Value of a Yes/No in a variable should I use Variant or String?

Eg I have tbl-UserSecurity which has a field "Admin" being yes/no format.

If I want to Dlookup that value into a public variable so that i can use it for IF statements later. What 'As' should I use in the Public intAdmin as ?????

Thanks Again - already this has the potential to cut so much text from coding and lead off the database from doing these lookup's all of the time..

Rob.

**ADezii** · Aug 17 '07, 11:09 AM

Originally posted by RobH

Actually - I found the problem ...

I had further down in the coding another IF statement - That was allocating the variable properly..

It was while I was exporting the required modules to a seperate database so i could attach it that i can accross it.

Thanks Guys.

Hey If I want to store the Value of a Yes/No in a variable should I use Variant or String?

Eg I have tbl-UserSecurity which has a field "Admin" being yes/no format.

If I want to Dlookup that value into a public variable so that i can use it for IF statements later. What 'As' should I use in the Public intAdmin as ?????

Thanks Again - already this has the potential to cut so much text from coding and lead off the database from doing these lookup's all of the time..

Rob.

Hey If I want to store the Value of a Yes/No in a variable should I use Variant or String?

The answer is neither. The value would be stored in a Boolean Type Variable, as in:

[CODE=vb]'Public/Global Declaration
Public blnAdmin As Boolean[/CODE]
[CODE=vb]'Initialization
blnAdmin = True[/CODE]
[CODE=vb]
'Evaluates to True and 'blnAdmin = True' appears in the Message Box
If blnAdmin Then
MsgBox "blnAdmin = True"
Else
MsgBox "blnAdmin = False"
End If
[/CODE]

**RobH** · Aug 17 '07, 01:10 PM

Originally posted by ADezii

The answer is neither. The value would be stored in a Boolean Type Variable, as in:

[CODE=vb]'Public/Global Declaration
Public blnAdmin As Boolean[/CODE]
[CODE=vb]'Initialization
blnAdmin = True[/CODE]
[CODE=vb]
'Evaluates to True and 'blnAdmin = True' appears in the Message Box
If blnAdmin Then
MsgBox "blnAdmin = True"
Else
MsgBox "blnAdmin = False"
End If
[/CODE]

If I want to store the colour for Fore Colour ie #887433 so that i can use it to effectively make a template for colours across the app would I use String?

I've tried

Code:

Public intBlue as String

then in the form On Open

Code:

    Me!Label1.ForeColor = intBlue

But I get a "Type Mismatch' error when the page loads.

**ADezii** · Aug 17 '07, 03:39 PM

Originally posted by RobH

If I want to store the colour for Fore Colour ie #887433 so that i can use it to effectively make a template for colours across the app would I use String?

I've tried

Code:

Public intBlue as String

then in the form On Open

Code:

    Me!Label1.ForeColor = intBlue

But I get a "Type Mismatch' error when the page loads.

Color values as you indicate would have to be LONG Integers - you cannot assign a String Value to a Control's ForeColor Property.

**RobH** · Aug 18 '07, 01:37 AM

Originally posted by ADezii

Color values as you indicate would have to be LONG Integers - you cannot assign a String Value to a Control's ForeColor Property.

So how can one find out what can be assigned where?

eg What can be assigned to Source Doc?

**ADezii** · Aug 18 '07, 11:43 AM

Originally posted by RobH

So how can one find out what can be assigned where?

eg What can be assigned to Source Doc?

A String would be assigned to Source Doc.
If you are not sure about the Variable Type assignments, check the Help Files. You will typically see information such as: Read/write String, returns an Integer, etc.

**RobH** · Aug 18 '07, 12:17 PM

Originally posted by ADezii

A String would be assigned to Source Doc.
If you are not sure about the Variable Type assignments, check the Help Files. You will typically see information such as: Read/write String, returns an Integer, etc.

Is there a simple way of setting up a Template at all - instead of having to copy the same text to all of the On Open in every form?

Sorry these are probably stupid questions.

**FishVal** · Aug 18 '07, 12:18 PM

Originally posted by RobH

So how can one find out what can be assigned where?

eg What can be assigned to Source Doc?

I recommend you to use object browser to view object properties/methods syntax. This also helps to understand object model better.

**ADezii** · Aug 18 '07, 12:27 PM

Originally posted by FishVal

I recommend you to use object browser to view object properties/methods syntax. This also helps to understand object model better.

Good suggestion, FishVal. The only problem is that the Object Browser can be very intimidating and confusing to a Newbie.

Troubles with global variables

Troubles with global variables

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment