The following finally worked, but don't ask me why:
Dim In() As Object = {"No","Name","XCoord","YCoord","Name","SHAREPRTORIG","SHAREPRTDEST"}
Dim VisumOut(,) As Object
VisumOut = Visum.Net.Zones.GetMultipleAttributes(In)
After million of tries it finally went fine. If you know why is that, please give us proper answer.
Powodzenia, Rafał!