VB的for循环该怎么写?

1、首先，我们输入For关键字。

2、然后我们定义一个循环变量。

3、然后我们写入【1 to 10】。

4、然后我峨眉呢输入【Next i】结束。

5、然后我们就可以在这里输入每次执行的语句。

6、最后运行就可以看到这个结果了。

添加两个烂衫塌Timer控件（Timer1和Timer2），再添加一个Label1，然后复制→饥圆粘贴，点击【是】，创建控件数组，也就变塌源成4个Label了。

参考代码如下：

Dim

i

As

Integer,

k

As

Integer

Private

Sub

Command1_Click()

Timer2.Enabled

=

True

Timer1.Enabled

=

False

End

Sub

Private

Sub

Form_Load()

Timer1.Enabled

=

False

Timer2.Enabled

=

False

Timer1.Interval

=

600

Timer2.Interval

=

1000

End

Sub

Private

Sub

Timer1_Timer()

lblDisp(i).Caption

=

StrConv(i

+

1,

vbWide)

i

=

i

+

1

If

i

=

4

Then

Timer1.Enabled

=

False

End

Sub

Private

Sub

Timer2_Timer()

lblDisp(k).Caption

=

k

+

1

k

=

k

+

1

If

k

=

4

Then

Timer2.Enabled

=

False:

Timer1.Enabled

=

True

End

Sub

---