If the case is only to return multiple values, I would use Functions as 
below ways instead of using Actions.

''**************************************1st 
way**************************************************************
Function Func_ReturnMultipleValsByConcatination(str1,str2,str3)

Func_ReturnMultipleValsByConcatination=str1 &"_" & str2  &"_" & str3
End Function

allNames=Func_ReturnMultipleValsByConcatination("Ram","Venkata","Hari") 
'print allNames
For i=0 to Ubound( Split(allNames,"_"))
msgbox Split(allNames,"_")(i)
Next
'****************************************************************************************************

''*************************************2nd 
way****************************************************************
Function Func_ReturnMultipleVals(str1,str2,str3)
   Dim myArray(2)
myArray(0)=str1
myArray(1)=str2
myArray(2)=str3
Func_ReturnMultipleVals=myArray
End Function

allNames=Func_ReturnMultipleVals("Ram","Venkata","Hari") 

print allNames(0)
print allNames(1)
print allNames(2)

''*****************************************************************************************************
Thanks,
*Ram..*



On Sunday, December 16, 2012 6:37:33 PM UTC+5:30, Honey wrote:
>
> if we want to return multiple values from the function then We can use 
>> "ACTION" by passing the values
>>
>
> Where as Function returns only one value. 
> ACTION  returns multiple values
>
>
>

-- 
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

Reply via email to