'100行書く
For i = 0 to 100
TextBox1.Text = "VB最強"
Next