无返回那就是一个子过程sub,而不是函数function了,比如交换两数Sub Swap(ByRef a, ByRef b) '交换两数 c = a a = b b = cEnd Sub用的时候Swap m,n