This might be useful
Dim A
A = Array(10,20,30)
Revarray A
Private Function RevArray(byVal arrayinput)
Dim i, ubnd
Dim newarray()
ubnd = UBound( arrayinput )
Redim newarray(ubnd)
For i = 0 to UBound( arrayinput )
newarray( ubnd - i ) = arrayinput( i )
Next
RevArray = newarray
End Function
Regards,
Karthik
On 1 July 2011 15:45, vamsi reddy <[email protected]> wrote:
> Hi All,
> I am a facing a question in an interview how to reverse an array?
> My point of view:
>
> * myarray=array(10,20,30)*
> * For i= ubound(myarray) to 0*
> * '*
> * '*
> * '*
> * Next*
> Please give the script
> Thanks in Advance...
> --
> Vamsi Reddy
> *09618272979*
>
> * *
>
>
> --
> 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
--
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
