Probably a Dumb Newbie Question!!

[DrewDog_21]

Why do you need a For...Next loop? Unless you need that for
a specific reason, try this

Option Explicit

Private Sub Command1_Click()

Dim i As Single, J As Single

For i = 1 To 10
    For J = 1 To i
        Text1.Text = Text1.Text & "*"
    Next
    If i <> 10 Then Text1.Text = Text1.Text & vbNewLine
Next

End Sub