VB中从键盘输入一个正整数，然后把该数的每位数字按逆序输出

量，才看起来很复杂，要分析清楚就必须先搞清楚各个变量的使用范围，和调用规则。
Dim x As Integer, y As Integer'这里有一组外部变量，整个过程都可以调用
Private Sub Command1_Click()
Dim a As Integer, b As Integer'局部变量，在这个过程中出现的都是指这个变量，其他地方的不可以调用，同名变量的变化也不会影响到它
a = 5: b = 3
Call sub1(a, b)
Print a, b
Print x, y’这里就是指输入外部变量x,y
End Sub

Private Sub sub1(ByVal m As Integer, n As Integer)
'这里有个注意点：m和n的传递方式不同，简单说来就是call sub1(a,b)中a的值传给m,之后m的改变不会影响a,两者独立改变值，而b的值传给n后，n的值改变会影响b,也就是最后print a,b中b的值是最后一个n值返回给b的。所以最后才会b=2
Dim y As Integer'这是必须与前面外部y区分的局部y,在sub1中涉及到的都是这个局部y,它的改变与外部y无关。
x = m + n: y = m - n'局部的y只在这里有改变，之后始终为2
m = fun1(x, y)'传递的参数是外部x和局部y
n = fun1(y, x)
End Sub
Private Function fun1(a As Integer, b As Integer) As Integer
'这里的参数a,b相当于fun1的局部变量，只和前面调用函数时的x,y有关，和之前的那组a,b无关，这里的传递方法也是需要注意。
x = a + b: y = a - b'注意点：计算了x=8+2=10之后，因为传递方法是互相影响的类型，那么fun1这里的a的值也随之改变，下面计算y时就是y=10-2=8
这就是你的第一个问题所在。而且还要注意：这里获得赋值的y是那个外部变量的y,因为那个