Loosing values when working on different functions and modules..
 

Hello,

I have a userform, and buttons on it...

I have a module, called lnCalculate

And functions..

ln1Calculate
ln2Calculate
...


When i press first button it makes;

a = 6

total = a+b+c+d+e

and second;

b= 7

total=a+b+c+d+e

so in this second step, I want to get a value, 13

But.. I got 7. What i guess is, after finishing first function, all data is
cleared

a,b,c,d,e are identified as double in the forms module...

I do not want to loose the values for a, b, c, d, e.. I want them to save
their values even they are used in different functions or different modules.

I just want them to clear their values only when i want (e.g a=0, b=0.. )

So how must define them so they will not loose their values?

thanks in advance,

Loosing values when working on different functions and modules..
 

One way is to dec;lare the variables globally (i.e., outside of the
functions).

Option Explicit

Dim a As Double, b As Double, c As Double, d As Double, e As Double

Function ln1Calculate()
a = 6
ln1Calculate = a + b + c + d + e
Debug.Print ln1Calculate 'yields 6
End Function

Function ln2Calculate()
b = 7
ln2Calculate = a + b + c + d + e
Debug.Print ln2Calculate 'yields 13
End Function
__________________________________________________ ___________________
"SupperDuck" wrote in message
...
Hello,

I have a userform, and buttons on it...

I have a module, called lnCalculate

And functions..

ln1Calculate
ln2Calculate
..


When i press first button it makes;

a = 6

total = a+b+c+d+e

and second;

b= 7

total=a+b+c+d+e

so in this second step, I want to get a value, 13

But.. I got 7. What i guess is, after finishing first function, all data
is
cleared

a,b,c,d,e are identified as double in the forms module...

I do not want to loose the values for a, b, c, d, e.. I want them to save
their values even they are used in different functions or different
modules.

I just want them to clear their values only when i want (e.g a=0, b=0.. )

So how must define them so they will not loose their values?

thanks in advance,

Loosing values when working on different functions and modules
 

Hello...

Not working...

I am using this variables in different modules. Different functions in
different modules...

I do not know why not working :(


"Vasant Nanavati" wrote:

One way is to dec;lare the variables globally (i.e., outside of the
functions).

Option Explicit

Dim a As Double, b As Double, c As Double, d As Double, e As Double

Function ln1Calculate()
a = 6
ln1Calculate = a + b + c + d + e
Debug.Print ln1Calculate 'yields 6
End Function

Function ln2Calculate()
b = 7
ln2Calculate = a + b + c + d + e
Debug.Print ln2Calculate 'yields 13
End Function
__________________________________________________ ___________________
"SupperDuck" wrote in message
...
Hello,

I have a userform, and buttons on it...

I have a module, called lnCalculate

And functions..

ln1Calculate
ln2Calculate
..


When i press first button it makes;

a = 6

total = a+b+c+d+e

and second;

b= 7

total=a+b+c+d+e

so in this second step, I want to get a value, 13

But.. I got 7. What i guess is, after finishing first function, all data
is
cleared

a,b,c,d,e are identified as double in the forms module...

I do not want to loose the values for a, b, c, d, e.. I want them to save
their values even they are used in different functions or different
modules.

I just want them to clear their values only when i want (e.g a=0, b=0.. )

So how must define them so they will not loose their values?

thanks in advance,

Loosing values when working on different functions and modules
 

What is the purpose of using different modules?
__________________________________________________ ______________________

"SupperDuck" wrote in message
...
Hello...

Not working...

I am using this variables in different modules. Different functions in
different modules...

I do not know why not working :(


"Vasant Nanavati" wrote:

One way is to dec;lare the variables globally (i.e., outside of the
functions).

Option Explicit

Dim a As Double, b As Double, c As Double, d As Double, e As Double

Function ln1Calculate()
a = 6
ln1Calculate = a + b + c + d + e
Debug.Print ln1Calculate 'yields 6
End Function

Function ln2Calculate()
b = 7
ln2Calculate = a + b + c + d + e
Debug.Print ln2Calculate 'yields 13
End Function
__________________________________________________ ___________________
"SupperDuck" wrote in message
...
Hello,

I have a userform, and buttons on it...

I have a module, called lnCalculate

And functions..

ln1Calculate
ln2Calculate
..


When i press first button it makes;

a = 6

total = a+b+c+d+e

and second;

b= 7

total=a+b+c+d+e

so in this second step, I want to get a value, 13

But.. I got 7. What i guess is, after finishing first function, all
data
is
cleared

a,b,c,d,e are identified as double in the forms module...

I do not want to loose the values for a, b, c, d, e.. I want them to
save
their values even they are used in different functions or different
modules.

I just want them to clear their values only when i want (e.g a=0,
b=0.. )

So how must define them so they will not loose their values?

thanks in advance,