Hi Chinna
Dim strMystring
Dim strUBound
Dim strCounter
Dim strFinalString
Dim strOnemoreString
strMystring="ABABABA"
strFinalString=""
strMystring=Split(strMystring,"A")
strUBound=UBound(strMystring)
----------Print the separated letters by using "For" loop------------
For strCounter=0 To strUBound
strOnemoreString= strMystring(strCounter)
strFinalString= strFinalString*&*strOnemoreString
Next
Repoerter.ReporterEvent micPass,"The required
string:","------"&strFinalString
Hoping that u hv got a resolution
Thanks
DivyaSridhar
On Fri, Jun 25, 2010 at 7:18 PM, chinna <[email protected]> wrote:
>
>
> --
> Thanks & Regards,
> Chinna,
> Mob:9739656841
>
> --
> 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]<mercuryqtp%[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
