Duffbert's Random Musings

Document Number:  1090574

Problem
Can a LotusScript Function be Designed to Return an Array?

Content
LotusScript functions are designed to return a scalar value, a Variant or an object reference.  An array can be returned using a Variant.   This can be done by either indicating "As Variant" or leaving it blank as variant is the default return type.

For example, either of the below will cause the function to return a Variant value:

Function Funky(a As String, b As String) As Variant
Function Funky(a As String, b As String)

Code example:

Given the function supplied below, the value of the result variable will be an array: result(0)="parta", result(1)="partb".

Sub Initialize
       result=Funky("parta", "partb")
End Sub

Function Funky(a As String, b As String) As Variant
       Dim cc(0 To 1) As String
       cc(0)=a
       cc(1)=b
       funky=cc
End Function