Passing form to a sub procedure

[Jean Christophe Avard]

Hi! I have a sub procedure that populate a combo box. I have that same combo
box on many form. So I would like to pass the form that call the sub as a
parameter of the sub procedure...
somthing l;ike this...
Public Sub populateFamilyCombo(ByVal this As form)

this.combobox.text = "blahblah example"

end sub

and I'd call it like populateFamilyCombo(me)

Anyone!?!?!?!?

[Kerry Moorman]

Jean,

Why not pass the combobox to be filled to the sub?

Kerry Moorman

"Jean Christophe Avard" wrote:

Hi! I have a sub procedure that populate a combo box. I have that same combo
box on many form. So I would like to pass the form that call the sub as a
parameter of the sub procedure...
somthing l;ike this...
Public Sub populateFamilyCombo(ByVal this As form)

this.combobox.text = "blahblah example"

end sub

and I'd call it like populateFamilyCombo(me)

Anyone!?!?!?!?

[Armin Zingler]

"Jean Christophe Avard" <NO***@M.BITCH> schrieb im Newsbeitrag
news:O0*************@TK2MSFTNGP10.phx.gbl...

Hi! I have a sub procedure that populate a combo box. I have that same
combo box on many form. So I would like to pass the form that call the sub
as a parameter of the sub procedure...
somthing l;ike this...
Public Sub populateFamilyCombo(ByVal this As form)

this.combobox.text = "blahblah example"

end sub

and I'd call it like populateFamilyCombo(me)

Anyone!?!?!?!?

Why don't you pass the combobox instead of the whole form?

Better approach is probably to derived your own combo from the default
combobox and add the code there. Afterwards, put your own combo on each
form. You won've have to pass anything.

Armin

[Jean Christophe Avard]

thank you guy!
"Armin Zingler" <az*******@freenet.de> wrote in message
news:Ow*************@TK2MSFTNGP10.phx.gbl...

"Jean Christophe Avard" <NO***@M.BITCH> schrieb im Newsbeitrag
news:O0*************@TK2MSFTNGP10.phx.gbl...

Hi! I have a sub procedure that populate a combo box. I have that same
combo box on many form. So I would like to pass the form that call the
sub as a parameter of the sub procedure...
somthing l;ike this...
Public Sub populateFamilyCombo(ByVal this As form)

this.combobox.text = "blahblah example"

end sub

and I'd call it like populateFamilyCombo(me)

Anyone!?!?!?!?

Why don't you pass the combobox instead of the whole form?

Better approach is probably to derived your own combo from the default
combobox and add the code there. Afterwards, put your own combo on each
form. You won've have to pass anything.

Armin