Private Sub Form_Click()
For i = 1 To 5
Print Tab(6 - i); String(2 * i - 1, "*"); " "; String(2 * (5 - i) + 1, "*")
Next i
End Sub
