Небольшая головоломка. Для развлечения. Вот пример

Sub Foo()

    Dim str As String

    str = "Hello"

    Bar (str)
    Debug.Print str 'prints "Hello" because str is evaluated and a copy is passed

    Bar str 'or Call Bar(str)
    Debug.Print str 'prints "Hello World"

End Sub

Sub Bar(ByRef param As String)

    param = param + " World"

End Sub

Кажется всё просто, но разные результаты. В первом случае печатается "Hello", во втором "Hello World". На этом можно погореть. Кто знает, почему? Ответ прост. Но кто докопается?

-------------------------------------------------------------
А ты вложил уже свой кровный рубль в 50-ти миллиардное состояние Билла Гейтса?

http://www.sql.ru/forum/1299466/vliyanie-skobok-pri-vyzove-funkcii-podprogrammy