ByVal - передача параметра по значению, ByRef - по ссылке (адрес)...
Dim IParam
Dim NParam
Private Function (ByVal Param1, ByRef Param2)
...
Param1 = 3
Param2 = 4
...
End Function
Sub
...
fuction IParam, NParam
...
End Sub
Сейчас этот форум просматривают: Google-бот и гости: 32