How do you return two values from a function

'How do you return two values from a function

result=example(2,3)

Function example(x,y)
dim myarray(2)
myarray(0) = x+y
myarray(1)=x*y
example=myarray
End function
msgbox result(0)
msgbox result(1)