UDFs
 

I apologize for the naive question but I cannot seem to find documentation
(even on McRitchie's) on how to create a User Defined Function with a return
value. Pls complete the following code...

Public Sub aaaaa

if itemcheck()=true then
msgbox("ok")
else
msgbox("not ok")
endif

Public function itemcheck

if blahblah=soso then
return_value=true
else
return_value=false
endif

end function

What do I have to add to the function so that it defines the return_value
and returns it to the calling subroutine;

Thanks for your patience

UDFs
 

Public function itemcheck

if blahblah=soso then
itemcheck=true
else
itemcheck=false
endif

end function

Regards,
Stefi


€žDoctorG€� ezt Ã*rta:

I apologize for the naive question but I cannot seem to find documentation
(even on McRitchie's) on how to create a User Defined Function with a return
value. Pls complete the following code...

Public Sub aaaaa

if itemcheck()=true then
msgbox("ok")
else
msgbox("not ok")
endif

Public function itemcheck

if blahblah=soso then
return_value=true
else
return_value=false
endif

end function

What do I have to add to the function so that it defines the return_value
and returns it to the calling subroutine;

Thanks for your patience

UDFs
 

One of the not so nice things in VB (IMO). The function name is the return
value, so in your case you must add

itemcheck=return_value

or code it to set that inline.


--
HTH

Bob Phillips

"DoctorG" wrote in message
...
I apologize for the naive question but I cannot seem to find documentation
(even on McRitchie's) on how to create a User Defined Function with a
return
value. Pls complete the following code...

Public Sub aaaaa

if itemcheck()=true then
msgbox("ok")
else
msgbox("not ok")
endif

Public function itemcheck

if blahblah=soso then
return_value=true
else
return_value=false
endif

end function

What do I have to add to the function so that it defines the return_value
and returns it to the calling subroutine;

Thanks for your patience

UDFs
 

Thank you both!!