public function setParameter ( ) as string()

dim str(0 to 2) as string
str(0)="value1"
str(1)="value2"
str(2)="value3"

return str
End function