Подскажите что может быть неправильно в этом коде

[Alexei-Strelok]

Допустим у меня есть на форме TextBox1 , кнопка и listbox : когда я нажимаю на кнопку должен добавляться пукт в listbox но вылазит ошибка MS Visual studio
Вот код OnClick-а для кнопки скажите что неправильно

Код: Выделить всё

Public sub Button1_Click
Dim a as string
a = TextBox1.Text
Listbox1.Items.add(Str$(a))
End sub

[arthur2]

но вылазит ошибка

КАКАЯ ошибка? Текст сообщения об ошибки прочитай и, очень может быть, сам поймешь, в чем дело

Что, по-твоему, в этом коде должна делать функция Str$?

[alibek]

У ListBox нет свойства Items.
Учи справочник.

[JohnK]

Код: Выделить всё

Public sub Button1_Click
Listbox1.Additem(TextBox1.Text)
End sub


P.S. Примеров в инете полно.

[Debugger]

Хаха, а вот и неправильно. Без скобочек надо.

[JohnK]

В начале Call пропустил... Хотя и не обязательно. Проверял?

[Debugger]

Это такой же рудимент, как и Let.

[JohnK]

Следовательно, твои сообщения - флуд, чистой воды.

[Debugger]

Вопрос стиля.
Если ты привыкнешь писать аргументы в скобочках, то будет очень плохо. К примеру:

Код: Выделить всё

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)

Private Sub Form_Load()
    Dim a As Long
    Dim b As Long
    a = 1234
    CopyMemory(a,b,len(a))
    'Эта строчка не пойдет
End Sub

И вообще, давай не развивать холивор на ровном месте в неположенном разделе.

[JohnK]

А если поставишь Call, перед именем функции? Я уверен, что пройдет

[arvitaly]

А если поставишь Call, перед именем функции? Я уверен, что пройдет

Да пойдет пойдет, только как бы у автора после этого

Код: Выделить всё

    Public sub Button1_Click
    Listbox1.Additem(TextBox1.Text)
    End sub

новый вопрос не появился: "НЕ РАБОТАЕТ КОД!!"

[alibek]

С чего бы ему не работать?

[JohnK]

Просто аж интересно. Давайте определимся. После Delphi и C рука не поворачивается вызывать функцию без скобок. Особенно когда нужно получить результат вызова.

[alibek]

А с чего ты решил, что это вызов функции?
Это вызов процедуры. С вычисляемым параметром, который передается по значению.

[arvitaly]

Потому что

Ошибка времени исполнения '424' - требуется объект

Для корректного вызова процедуры с аргументами в скобках - необходим оператор Call (как я всегда и пишу чтобы не путаться с другими языками)

[Хакер]

Надо понимать, что в Сях скобки являются оператором вызова функции, а то, что стоит слева от скобок (надо понимать, что там не обязательно может стоять имя функции) является просто указателем на функцию. Поэтому именно скобки, а не упоминание имени функции, делают вызов чего-то там. В VB же, напротив, строка вида foo() является атомарным (а не составным, как в сях) выражением, и она вся (целиком) обозначает вызов. Так как указателей концептуально нет, то упоминанию имени функции в принципе не может быть придумано какое-либо применение, кроме как вызов этой функции (случай с AddressOf не в счёт). А раз так, то скобки являются чисто синтаксическим средством, чтобы обозначить, где заканчивается список передаваемых параметров. Никаких иных функций скобки не выполняют.

Когда у какой-то функции аргументов нет, то, естественно, что никаких параметров передаваться не будет. Тогда скобки не нужны и компилятор совершенно не требует, чтобы они были указаны при вызове такой функции.

Вызов же Sub-а не являеется ни атомарным выражением, ни вообще каким-либо выражением, а является особым типом statement-а. Раз это не выражение, вызов не может входить в состав какого-то другого выражения. Раз так, то весь statement будет представлять собой имя Sub'а и передаваемые параметры. В этом случае скобки тоже не нужны, потому что не нужно обозначать, где заканчивается список передаваемых параметров (он заканчивается вместе со statement-ом).

[alibek]

Для корректного вызова процедуры с аргументами в скобках - необходим оператор Call (как я всегда и пишу чтобы не путаться с другими языками)

А причем тут это? И неужели трудно проверить, прежде чем говорить?
Если строку запишу так

Код: Выделить всё

Listbox1.Additem (TextBox1.Text)

будет понятнее?

[Mikle]

alibek
Тут не аргументы в скобках, а содержащий скобки аргумент. Явно указать номер итема в этих же скобках не удастся.