LZ大大，你的问题也太雷人了
您是刚学VB？有书？书上没有for循环？
dim i as integer
    For i = 1 To 10
        Debug.Print "这是循环第" & i & "次"
    Next i
运行后，在立即窗口里
这是循环第1次
这是循环第2次
这是循环第3次
这是循环第4次
这是循环第5次
这是循环第6次
这是循环第7次
这是循环第8次
这是循环第9次
这是循环第10次

就是这样用了