Code:
function fnGetVal(Sql, intRowNo, arrRowVal() , strResult,byref ReturlValue1,byRef ReturnValue2)
'-- code to read access table & store in array arrRowVal, count in intRowNo, result pass/fail in strEndResult.
ReturnValue1="qqqq"
RetuenValue2="aaaa"
fnGetVal=arrRows
End function
Assign Return array to function name directly.
For Example
Code:
'Call to the function
Arr=Mytest
msgbox Arr(0)
' Function Defination
Public function Mytest()
Humm=Array(1,2,3,4)
End Function