怎么使用VB编写的程序或子程序无限循环执行或规定循还次数的循环？

无限循环
Do While True
...
loop

循环n次
for i = 1 to n
next i

当然是用Timer控件来做喽
Private Sub Timer1_Timer()
...'//无限循环就直接在这里写代码
End Sub

有限循环的如下所示
Private Sub Timer1_Timer()
i = i +1
If i > myNum Then Unload Me '这里的myNum是你要循环的次数
End Sub