Sub PlusOne(ByRef v as Integer)
　v = v + 1
End Sub
という参照渡しのサブルーチンのがあって
最初　x = 0 で
Call PlusOne(x)
や
PlusOne x
の場合xは1になるのだけど
PlusOne(x)
の場合0になる。これ結構バグのもとだった。