学习完数组这个知识点后，小林设计了一个程序，该程序的主要功能是，先给数组中每个元素赋值，再找出数组中最大的数，具体程序如下。

（1）数组a中共有_____________个变量。
（2）数组a中所有变量的类型____________（相同或不相同）。
（3）将程序中①的代码补充完整______________。
（4）将程序中②的代码补充完整_______________。

将下列表达式的VB表达式
(1).数学关系式3≤x<10表示成正确的VB表达式为_____________________
(2).数学表达式√x²-36 ≥∣x-3∣ 表示成正确的VB表达式为____________________
(3).y能被4整除但是不能被100整除，或者y能被400整除。
表示成正确的VB表达式为____________________

定义一个数组如下:
Dim a(10 to 20) as integer   
则此数组中元素的个数为_____________。

在VB中，下列选项能用作变量名的是（  ）

A．x2

B．3y

C．x+2

D．3+y

求两个整数的最大公约数分析：求最大公约数的算法思想：
（1）对于已知两数m，n，使得m>n；
（2）m除以n得余数r；
（3）若r=0，则n为求得的最大公约数，算法结束；否则执行(4)；
（4）m←n，n←r，再重复执行(2)。
例如: 求 m="14" ,n="6" 的最大公约数.
M n r
14 6 2
6 2 0
请根据以上思路补充下面的程序代码：
Private Sub Command1_Click()
m = InputBox("m=")
n = InputBox("n=")
If m < n  Then  t =" m:" m =" n:" n = t
r = ________________
Do While (r <> 0)
m = n
n = r
r =" m" Mod n
Loop
Print "最大公约数=", n
End Sub