Pass Variable from closed Form

[mystuff]

Hi,

I have a form that opens another form in dialog mode. The user selects the record they want by pressing a button on the 2nd form. I save the [ID] in a variable and then close the 2nd form. Then control goes back to the first form.

Is there a way to use the variable that I saved?

Thanks.

 

[hneal98]

Only if the variable is on the current form. In other words, you would need to pass the data from the form the user will close, to the form that called that form in the first place.

Another way to do it would be to declare the variable in a module and then you can access the variable anytime you want it from anywhere in your application.

You need to be careful with that however. Make sure you empty the variable when you are finished with it and also make sure you know when you have finished with it so you don't overwrite data you need.

Hope this helps.

 

[kjv1611]

What about using a Public variable that can be passed between various objects? Like this:

Option Compare Database
Option Explicit
Public strMyStringVariable As String

And just store it in a Module (not form level coding, but a module that would be listed under "Modules" in the VBA window, and in the Access (F11) window.

Stephen
"Jesus saith unto him, I am the way, the truth, and the life:
no man cometh unto the Father, but by me." John 14:6 KJV

 

[hneal98]

Public variables are usually not a good idea, also, if you have the public variable on the form that closes, it goes away.

 

[Elysium]

Or, create a property for the ID.

 

[mystuff]

OK, thanks ... I was able to declare the variable as a global variable in a Public Module.

But I still have one more problem: The variable name I am using is gstrID. When I try to use the value with ApplyFilter, the system thinks the value is a variable name and it prompts me with "Enter Parameter Value".


strFilter = "[Project Budget Number] = " & gstrId
DoCmd.ApplyFilter , strFilter

The value of gstrID is "PB0002"
But the system thinks this is a field name and prompts me to Enter Parameter Value PB0002. Then, if I type in PB0002 as the value, the ApplyFilter doesn't work anyway.

In the Debug immediate window, I can see that the strFilter variable is "[Project Budget Number] = PB0002".

I hope this is not too confusing. Any thoughts?

 

[kjv1611]

Hmm, just a guess, what about changing your above to this:

strFilter = "[Project Budget Number] = '" & gstrId & "'"

just a guess... I've not messed with filters yet, that I know of..


Stephen
"Jesus saith unto him, I am the way, the truth, and the life:
no man cometh unto the Father, but by me." John 14:6 KJV

 

[lewds]

Hi...
Try converting the variable to a function. Place this in the module where you declared the variable Global

Public Function FngstrId()
FndstrId = gstrId
end function

Use the Function name in your applyfilter

strFilter = "Project Budget Number = " & FngstrId()DoCmd.ApplyFilter , strFilter