you can write the simpler one.
Dim arr, res(4), temp, count1
count1=0
arr=array(11, 22, 33, 44, 22, 44, 55, 11)
For i=lbound(arr) to ubound(arr)
temp=i
For j=i+1 to ubound(arr)
If arr(i)<>arr(j) Then
temp=temp+1
End If
Next
If temp=ubound(arr) Then
res(count1)=arr(i)
count1=count1+1
End If
Next
For i=0 to count1-1
print res(i)
Next
Thanks,
Amit
On Mon, Oct 7, 2013 at 3:27 PM, Venkat Kandula <[email protected]>wrote:
> Hi Experts,
>
> I need a script for the below question.
>
> How to find the duplicate values in an array and Delete the Duplicate
> values from the array.
>
> Thanks,
> Venkat
>
> --
> --
> 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 Groups
> "QTP - HP Quick Test Professional - Automated Software Testing" group.
> To unsubscribe from this group and stop receiving emails from it, send an
> email to [email protected].
> For more options, visit https://groups.google.com/groups/opt_out.
>
--
--
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 Groups "QTP
- HP Quick Test Professional - Automated Software Testing" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
For more options, visit https://groups.google.com/groups/opt_out.
