VARIABLE FOR i= too=

PrivateSub Button1_Click_1(ByVal sender AsSystem.Object, ByVal e AsSystem.EventArgs) Handles Button1.Click

Dim HOLA As String

HOLA = TextBox1.Text

For i = 1 To 20

            TextBox1.Text += "hola" + vbCrLf

Next i

EndSub

EndClass

PrivateSub Button1_Click_1(ByVal sender AsSystem.Object, ByVal e AsSystem.EventArgs) Handles Button1.Click

Dim HOLA AsString

        HOLA = TextBox1.Text

For i = 1 To 20

            TextBox1.Text += CStr(i) + ".hola" + vbCrLf

Next i

EndSub

EndClass

PrivateSub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim numero AsInteger

Dim resultado AsInteger

numero = TextBox1.Text

For i = 1 To 20

            resultado = numero * i

            TextBox2.Text += CStr(numero) + "*" + CStr(i) + "=" + CStr(resultado) + vbCrLf

Next i

EndSub

EndClass