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

 

[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

 

[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.

 

[Armin Zingler]

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