Question

看不懂这段vb,望哪位老师解释一下

Private Sub Command1_Click()
Dim check, counter '这种定义变量的方法,是什么意思,为什么不用as?这两个是vb关键字还是一般变量?
check = True
connter = 0
Do
Do While counter < 20
conter = conter + 1
If conter = 10 Then
check = False
Exit Do
End If
Loop
Loop Until check = False
Print counter, check
End Sub
'这里一共有三重循环吧?还望行家遂重解释一下,我真的看不太懂呀!

Answer 1

Private Sub Command1_Click()
Dim check, counter '这种定义变量的方法,是什么意思,为什么不用as?这两个是vb关键字还是一般变量? 这是一般变量的声明方式，用于声明不知类型的即对象型的变量
check = True
connter = 0
Do
Do While counter < 20
conter = conter + 1
If conter = 10 Then
check = False
Exit Do
End If
Loop
Loop Until check = False
Print counter, check
End Sub
只有两重循环

Answer 2

不用as，则VB默认为变体型变量。
只有两个DO，是二重循环。但其中的外层循环跟内层循环会同时结束。

Answer 3

Dim估计是变量声明
二重循环，没有全局变量的话，一重应该就够了

只是路过，不懂VB，今天看了两个VB程序，真比Pascal还要命。。。