membuat rumus perulangan dgn vb

membuat rumus perulangan dengan rmus visual basik.

Private Sub Form_Load()
    Text1.Text = ""
    Text2.Text = ""
    Text3.Text = ""
    Text4.Text = ""
    For i = 1 To 10
        Text1.Text = Text1.Text & i
        Next i

    For j = 10 To 1 Step -1
        Text2.Text = Text2.Text & j
        Next j
   
    For k = 65 To GO
        Text3.Text = Text3.Text & Chr(k)
        Next k
   
End Sub