Can a subroutine return a value

Hi ,

Can a subroutine return a value ? or can it be made to do so ?

for eg

Private Sub multi() as Integer

End Sub

this statement gives an error "end of statement" at "as" though.

No it cannot. You need to create a Function to return a value. Subroutines are only used to execute something while Functions can actually execute and return a value.

As ProEdge said, as you put the instructions it can't work, the right way is

Function multi() as Integer

End Function

but sub can return a value if the parameter is refered as by reference not as a value, but the syntax is.

Sub muti(byref AN_INT as integer)

end sub

The vaue will be returned in the AN_INT variable

Actually, the variable AN_INT isn't returned, when passing ByRef you are actually sending the Procedure the memory address of the object to be affected. The sub does whatever it's going to do, then control is returned back to the code that originally called the Sub.

So the object (variable) itself isn't being passed to or from the procedure, only the memory address is getting passed.

ByVal - means a copy of the the original object is being used.

ByRef - means the original object itself is being used.

Yes. Use ByRef variables as args for your Sub.