Variable's value doesn't store in function (1 Viewer)

born2live · Sep 9, 2014

Hi,
I defined a public variable and then for being able to filter a query results, assigned it to a public function. The problem is that function doesn't get the variable's value.:banghead:

Any helps will be appreciated
Thanks

Isskint · Sep 9, 2014

A little more detail would help us to help you. Can you post the code containing the Public variable declaration and the function code?

born2live · Sep 9, 2014

Dear Isskint,
the code comes as follow:

in the module:
Public PartNo As String

Public Function FilterPartNo()
FilterPartNo = PartNo
End Function
------------------
in the form:
Private Sub txtPartNo_Click()
Me.Refresh
PartNo = [Forms]![frmCompareCurrentAndPreviousCondition]![txtPartNo]
End Sub
***
In the form variable gets the value, but the function (FilterPartNo) doesn't get the stored variable.

JHB · Sep 9, 2014

You need use a module to set the value.

RainLover · Sep 9, 2014

born2live said:
Dear Isskint,
the code comes as follow:

in the module:
Public PartNo As String

Public Function FilterPartNo()
FilterPartNo = PartNo
End Function
------------------
in the form:
Private Sub txtPartNo_Click()
Me.Refresh
PartNo = [Forms]![frmCompareCurrentAndPreviousCondition]![txtPartNo]
End Sub

***
In the form variable gets the value, but the function (FilterPartNo) doesn't get the stored variable.

Have you tested any of the results.

You can do this simply by placing a Message Box where you need to prove that you have a value and what that value is.

vbaInet · Sep 9, 2014

Is the name of your field not PartNo?

born2live · Sep 9, 2014

vbaInet said:
Is the name of your field not PartNo?

vbaInet, sorry I didn't understand what is your exact question.

vbaInet · Sep 9, 2014

What is the name of the field bound to txtPartNo? Look in the Control Source property for txtPartNo.

born2live · Sep 9, 2014

RainLover said:
Have you tested any of the results.

You can do this simply by placing a Message Box where you need to prove that you have a value and what that value is.

You know, I have a form in which there are many records while the PartNo field is unique for each record. On the other hand there is a query with more details about PartNo. I want by clicking on a button (in the form), those mentioned details be shown only for the clicked record (which refers to only one 'PartNo'). The written function is for getting that PartNo to use in the query's criteria part.

RainLover, you're right: I had used Msgbox command to check the results. First Msgbox in the form works and shows the related PartNo, but second Msgbox in the function shows nothing and it's blank.

vbaInet · Sep 9, 2014

You cannot use the same name "PartNo" as the name of your variable. Call it:

Public strPartNo As String

DavidAtWork · Sep 9, 2014

"In the form variable gets the value, but the function (FilterPartNo) doesn't get the stored variable"
But how/when are you using/calling the function FilterPartNo?

David

born2live · Sep 9, 2014

vbaInet said:
What is the name of the field bound to txtPartNo? Look in the Control Source property for txtPartNo.

Aha! You guessed correctly vbaInet. Yeah, the control's name is PartNo. Is it the problem?

born2live · Sep 9, 2014

vbaInet said:
You cannot use the same name "PartNo" as the name of your variable. Call it:

Public strPartNo As String

Yeah, it came in handy!
Thank you so much vbaInet. Your're a genius.

vbaInet · Sep 9, 2014

There are 4 other greater geniuses on this thread.

RainLover · Sep 9, 2014

vbaInet

You are too modest.

RainLover · Sep 9, 2014

Is there really a need for the public variable.

It looks to me that the value only gets used once.

Am I right wrong or indifferent.

vbaInet · Sep 9, 2014

RainLover said:
Is there really a need for the public variable.

It looks to me that the value only gets used once.

Am I right wrong or indifferent.

The poster could have done:

Code:

Public Function FilterPartNo()
    FilterPartNo = [Forms]![frmCompareCurrentAndPreviousCondition]![txtPartNo]
End Function

But I think that they wanted to keep everything within scope and perhaps that variable is going to be used elsewhere as well.

RainLover · Sep 9, 2014

This is all that is required as far as I can see.

Code:

 FilterPartNo = [Forms]![frmCompareCurrentAndPreviousCondition]!PartNo]

Why could one possibly need more.

Variable's value doesn't store in function (1 Viewer)

born2live

Registered User.

Isskint

Slowly Developing

born2live

Registered User.

JHB

Have been here a while

RainLover

VIP From a land downunder

vbaInet

AWF VIP

born2live

Registered User.

vbaInet

AWF VIP

born2live

Registered User.

vbaInet

AWF VIP

DavidAtWork

Registered User.

born2live

Registered User.

born2live

Registered User.

vbaInet

AWF VIP

RainLover

VIP From a land downunder

RainLover

VIP From a land downunder

vbaInet

AWF VIP

RainLover

VIP From a land downunder

Similar threads

Users who are viewing this thread