Jak zmodyfikować obiekt O w procedurze, w której jest on przekazywany jako ByVal?
Nie można zmienić definicji funkcji. (wiem, że ByRef rozwiązałby problem, ale musi zostać ByVal)
Private Sub Nazwa(ByVal O As Object)
- ... tutaj modyfikacja obiektu O ...*
End Sub