VBScript Examples: Loops

The following example loops though an input vlue and prints a triangle based on the number entered

rows = InputBox("enter rows")
x = 1
map = ""
While x <= Cint(rows)
 y = 1
   While y <= x
    map = map & "*"
    y = y + 1
   Wend
       map = map & vbcrlf
    x = x + 1
Wend
Msgbox map