How to update label.txt from a module????

[Hexman]

In my program I have several labels that I want to update with
information that is being processed in a calculation module. I have
code similar to the following in my module. As it goes through its
process, I would like to show an update to the counts that are being
generated to show progress.

Code in a module........
cntClasses = cntClasses + 1
cntTrials = cntTrials + 3

Form1.lblCntCla sses.Text = Format(cntClass es, "###,###")
Form1.lblCntTri als.Text = Format(cntTrial s, "###,###")

End Code.......

I get errors on the "Form1.lbl..... ." statements which says "Reference
to a non-shared member requires an object reference.".

How do I rectify this? Do I have to refresh Form1 again?

Code examples or suggestions?

Sorry for the newbie questions.

Hexman

[I Don't Like Spam]

Hexman wrote:

In my program I have several labels that I want to update with
information that is being processed in a calculation module. I have
code similar to the following in my module. As it goes through its
process, I would like to show an update to the counts that are being
generated to show progress.

Code in a module........
cntClasses = cntClasses + 1
cntTrials = cntTrials + 3

Form1.lblCntCla sses.Text = Format(cntClass es, "###,###")
Form1.lblCntTri als.Text = Format(cntTrial s, "###,###")

End Code.......

I get errors on the "Form1.lbl..... ." statements which says "Reference
to a non-shared member requires an object reference.".

How do I rectify this? Do I have to refresh Form1 again?

Code examples or suggestions?

Sorry for the newbie questions.

Hexman

you either have to pass a reference to the form and make a property to
edit it, or pass the label into the module.

chris

[Hexman]

On Mon, 28 Nov 2005 22:40:28 -0500, I Don't Like Spam <[e-mail]>
wrote:

Hexman wrote:

In my program I have several labels that I want to update with
information that is being processed in a calculation module. I have
code similar to the following in my module. As it goes through its
process, I would like to show an update to the counts that are being
generated to show progress.

Code in a module........
cntClasses = cntClasses + 1
cntTrials = cntTrials + 3

Form1.lblCntCla sses.Text = Format(cntClass es, "###,###")
Form1.lblCntTri als.Text = Format(cntTrial s, "###,###")

End Code.......

I get errors on the "Form1.lbl..... ." statements which says "Reference
to a non-shared member requires an object reference.".

How do I rectify this? Do I have to refresh Form1 again?

Code examples or suggestions?

Sorry for the newbie questions.

Hexman

you either have to pass a reference to the form and make a property to
edit it, or pass the label into the module.

chris

Currently I have 6 labels that I want updated on the form, with more
to come. Any preference to either of the methods you mentioned? Any
code snippet of either?

Thanks,

Hexman

[I Don't Like Spam]

Hexman wrote:

On Mon, 28 Nov 2005 22:40:28 -0500, I Don't Like Spam <[e-mail]>
wrote:

Hexman wrote:

In my program I have several labels that I want to update with
informatio n that is being processed in a calculation module. I have
code similar to the following in my module. As it goes through its
process, I would like to show an update to the counts that are being
generated to show progress.

Code in a module........
cntClasses = cntClasses + 1
cntTrials = cntTrials + 3

Form1.lblCntCla sses.Text = Format(cntClass es, "###,###")
Form1.lblCntTri als.Text = Format(cntTrial s, "###,###")

End Code.......

I get errors on the "Form1.lbl..... ." statements which says "Reference
to a non-shared member requires an object reference.".

How do I rectify this? Do I have to refresh Form1 again?

Code examples or suggestions?

Sorry for the newbie questions.

Hexman

you either have to pass a reference to the form and make a property to
edit it, or pass the label into the module.

chris

Currently I have 6 labels that I want updated on the form, with more
to come. Any preference to either of the methods you mentioned? Any
code snippet of either?

Thanks,

Hexman

Why is this code in a module? Why not have the code in the form? Both
of those are preffered ways. To pass the form into a function just do
it like any other call:

Public sub XYZ(F as FormClass)
f.label1text = "String"
end sub

public Class FormClass
public sub CallModule
XYZ(Me)
end sub
end class

[Cor Ligthert [MVP]]

Hexman,

Why not use OOP

You have your labels normally on a form and when the user clicks a button
you start to update your labels

In a very very very simplified sample.

\\\\
dim myobject as new myOwnClass(100)
mylabel1 = myobject.mytext 1
mylabel2 = myobject.mytext 2
///
\\\
Public class MyOwnClass
Public myText1 as String
Public myText2 as Sring
Public sub New (byval PassedToMe as integer)
myText1 = (passedtome*1). ToString
myText2 = (passedtome* 5).ToString
end Sub
///

I hope this gives an idea.

Cor

"Hexman" <He****@binary. com> schreef in bericht
news:1h******** *************** *********@4ax.c om...

In my program I have several labels that I want to update with
information that is being processed in a calculation module. I have
code similar to the following in my module. As it goes through its
process, I would like to show an update to the counts that are being
generated to show progress.

Code in a module........
cntClasses = cntClasses + 1
cntTrials = cntTrials + 3

Form1.lblCntCla sses.Text = Format(cntClass es, "###,###")
Form1.lblCntTri als.Text = Format(cntTrial s, "###,###")

End Code.......

I get errors on the "Form1.lbl..... ." statements which says "Reference
to a non-shared member requires an object reference.".

How do I rectify this? Do I have to refresh Form1 again?

Code examples or suggestions?

Sorry for the newbie questions.

Hexman

[Hexman]

On Mon, 28 Nov 2005 23:34:35 -0500, I Don't Like Spam <[e-mail]>
wrote:

Hexman wrote:

On Mon, 28 Nov 2005 22:40:28 -0500, I Don't Like Spam <[e-mail]>
wrote:

Hexman wrote:

In my program I have several labels that I want to update with
informati on that is being processed in a calculation module. I have
code similar to the following in my module. As it goes through its
process, I would like to show an update to the counts that are being
generated to show progress.

Code in a module........
cntClasses = cntClasses + 1
cntTrials = cntTrials + 3

Form1.lblCntCla sses.Text = Format(cntClass es, "###,###")
Form1.lblCntTri als.Text = Format(cntTrial s, "###,###")

End Code.......

I get errors on the "Form1.lbl..... ." statements which says "Reference
to a non-shared member requires an object reference.".

How do I rectify this? Do I have to refresh Form1 again?

Code examples or suggestions?

Sorry for the newbie questions.

Hexman

you either have to pass a reference to the form and make a property to
edit it, or pass the label into the module.

chris

Currently I have 6 labels that I want updated on the form, with more
to come. Any preference to either of the methods you mentioned? Any
code snippet of either?

Thanks,

Hexman

Why is this code in a module? Why not have the code in the form? Both
of those are preffered ways. To pass the form into a function just do
it like any other call:

Public sub XYZ(F as FormClass)
f.label1text = "String"
end sub

public Class FormClass
public sub CallModule
XYZ(Me)
end sub
end class

I have the code in a module because it is a data access module and is
called from several different forms.

Thanks for the example.

Hexman.

[Hexman]

On Tue, 29 Nov 2005 08:09:59 +0100, "Cor Ligthert [MVP]"
<no************ @planet.nl> wrote:

Hexman,

Why not use OOP

You have your labels normally on a form and when the user clicks a button
you start to update your labels

In a very very very simplified sample.

\\\\
dim myobject as new myOwnClass(100)
mylabel1 = myobject.mytext 1
mylabel2 = myobject.mytext 2
///
\\\
Public class MyOwnClass
Public myText1 as String
Public myText2 as Sring
Public sub New (byval PassedToMe as integer)
myText1 = (passedtome*1). ToString
myText2 = (passedtome* 5).ToString
end Sub
///

I hope this gives an idea.

Cor

"Hexman" <He****@binary. com> schreef in bericht
news:1h******* *************** **********@4ax. com...

In my program I have several labels that I want to update with
information that is being processed in a calculation module. I have
code similar to the following in my module. As it goes through its
process, I would like to show an update to the counts that are being
generated to show progress.

Code in a module........
cntClasses = cntClasses + 1
cntTrials = cntTrials + 3

Form1.lblCntCla sses.Text = Format(cntClass es, "###,###")
Form1.lblCntTri als.Text = Format(cntTrial s, "###,###")

End Code.......

I get errors on the "Form1.lbl..... ." statements which says "Reference
to a non-shared member requires an object reference.".

How do I rectify this? Do I have to refresh Form1 again?

Code examples or suggestions?

Sorry for the newbie questions.

Hexman

Thanks for the example. I'll try it.

Thanks,

Hexman

[Armin Zingler]

"Hexman" <He****@binary. com> schrieb

Why is this code in a module? Why not have the code in the form?
Both of those are preffered ways. To pass the form into a
function just do it like any other call:

Public sub XYZ(F as FormClass)
f.label1text = "String"
end sub

public Class FormClass
public sub CallModule
XYZ(Me)
end sub
end class

I have the code in a module because it is a data access module and
is called from several different forms.

I agree with Chris. You should better either derive the Forms from a base
Form containing the common controls and put the code there, or put the
controls in a Usercontrol and place it on all your Forms.
Armin