Private Sub Form_Load()Dim i As IntegerFor i = 0 To 100 Step 5Text1.Text = Text1.Text + CStr(i)Next iEnd Sub
