Need Simple Looping Help

[halo combat22]

I want to know if it is possible to make the design below in a picture box with loops instead of just writing....
picture1.print "*****"
picture1.print "****"
picture1.print "***"
etc...

The shape i am looking for is a triangle flipped vertically like so
* * * * *
- * * * *-
--* * *--
--- * *---
----* ----
Ty.


ps. the _ means spaces

[kadghar]

I want to know if it is possible to make the design below in a picture box with loops instead of just writing....

ps. the _ means spaces

Well if you can find a "function" that makes each line, i think its possible. For this very case, where you want to start with n times a * and each time you replace the first * with a space and add another space at the end, something like this should help

dim Str1 as string
dim Str2 as string
dim i as integer
dim n as integer
'lets say n=10
n=10
str1=string(n, "*")
str2=str1
for i = 2 to n
    str1 = string(i - 1, " ") & mid(str1, i) & " "
    str2 = str2 & chr(10) & str1
next
'then just print it..
msgbox str2

It can also be done using InStr.
But almos in every case, you wont be able to do this and you'll have to write line by line
HTH