Color parameter as optional in a function

[Crirus]

I need to set a parameter for a function as optional and color... how can I
do that, because seems I cant set structure as optional parameter

--
Cheers,
Crirus

------------------------------
If work were a good thing, the boss would take it all from you

------------------------------

[One Handed Man]

You could use a ParamArray or you could use

Sub ThisSub( y As Integer, Optional y As String = "Default Value")
MessageBox.Show("DA is: " & Y)
End Sub
Regards - OHM

Crirus wrote:

I need to set a parameter for a function as optional and color... how
can I do that, because seems I cant set structure as optional
parameter

--
Best Regards - OHM

O_H_M{at}BTInternet{dot}com

[Rigga]

Or you could overload the function definition.

Public function thisFunc(x as string, y as integer, z as structure)

end func

Public function thisFunc(x as string, y as integer)

end func

Rigga.

"Crirus" <Cr****@datagroup.ro> wrote in message
news:ew**************@TK2MSFTNGP09.phx.gbl...

I need to set a parameter for a function as optional and color... how can I do that, because seems I cant set structure as optional parameter

--
Cheers,
Crirus

------------------------------
If work were a good thing, the boss would take it all from you

------------------------------

[Armin Zingler]

"Crirus" <Cr****@datagroup.ro> schrieb

I need to set a parameter for a function as optional and color...
not possible
how
can I do that,
not at all...
because seems I cant set structure as optional
parameter

....for this reason
Overload the procedure:
sub test()
end usb

sub test(byval c as color)
end sub
--
Armin

http://www.plig.net/nnq/nquote.html
http://www.netmeister.org/news/learn2quote.html