sorting in asc order
str="12789567899012" for intx=1 to len(str) Redim preserve strarr(intx) strarr(intx)= Mid(str,intx,1) next For intx=Ubound(strarr)-1 to Lbound(strarr) step-1 for jntx=Lbound(strarr) to intx If strarr(jntx) > strarr(jntx+1) then temp=strarr(jntx+1) strarr(jntx+1)=strarr(jntx) strarr(jntx)=temp End IF next Next msgbox Join(strarr) On Wed, Jun 26, 2013 at 11:32 AM, shilpa gupta <[email protected]>wrote: > Hi friends > > I want to arrange below values in ascending and descing orders, pls tell > me how we can do it in vb scriptting > 1. 12789567899012 > > and > 2. abCBAhga > > etc > > -- > -- > 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.
