x=""
k=7
for i = 1 to 8
x=x&space(k)& (string(i,"*"))&vblf
k=k-1
next
k=0
for i = 8 to 1 step -1
x=x&space(k)& (string(i,"*"))&vblf
'rem x=x& (string(i,"*"))&vblf
k=k+1
next
msgbox x
Use it it will give you like this
*
* *
* * *
* *
*
use the same logic and change it as per your requirement...:)
On Sun, Jan 15, 2012 at 2:16 PM, Chandan Mishra <
[email protected]> wrote:
>
>
> 1.W.P for display like this
>
> * *
> * * * *
> * * * * * *
> * * * * * * * *
> * * * * * * * * *
>
> 2.W.P display like this
>
>
> * * * * * * * * *
> * * * * * * * *
> * * * * * *
> * * * *
> * *
> * * * *
> * * * * * *
> * * * * * * * *
> * * * * * * * * *
> * * * * * * * * * *
>
> --
> 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
--
Thanks and Reagards
Santhosh G
+918007850250
--
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
