Re: Заполнение раскрывающегося списка
c_ListBox_0 - это константа, генерируемая по команде Создать список констант формы.
Это не обязательно конечно, сделано для удобства. Если вы ими пользуетесь то либо заведите сами, либо командой создайте.
Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
TechnologiCS → TechnologiCS → Использование TechnologiCS API → Заполнение раскрывающегося списка
Чтобы отправить ответ, вы должны войти или зарегистрироваться
c_ListBox_0 - это константа, генерируемая по команде Создать список констант формы.
Это не обязательно конечно, сделано для удобства. Если вы ими пользуетесь то либо заведите сами, либо командой создайте.
Сразу вдогонку вопрос по той же теме.
Пользователь должен выбрать из списка строку.
Нужно получить значение выбранной строки.
Пишу:
Sub FormEvent_Button_0_OnObjectClick( Form, ObjName ) 'Кнопка "Далее" MsgBox "Элементов в списке: " & Form.c_ListBox_0.Items.Count MsgBox "Выбрана строка: " & Form.c_ListBox_0.ItemIndex If Form.c_ListBox_0.ItemIndex<>"-1" Then 'Если выбран элемент списка, то For i=0 To Form.c_ListBox_0.Items.Count-1 If Form.c_ListBox_0.Selected(i) Then oboz_doc = Form.c_ListBox_0.Items End If Next Form.Close(1) Else msgbox "Выберите строку" End If End Sub
На строке
If Form.c_ListBox_0.Selected(i) Then
макрос зависает.
Обработка ошибок результата не даёт.
ItemIndex - индекс элемента (в Items ) на котором стоит курсор ( оно же выделение если выделен один элемент, MultiSelect=False)
SelectedItems - список строк выделенных, если MultiSelect=True
Извините, не поняла.
ItemIndex - это одновременно и индекс элемента и его значение?
У ListBox свойство MultiSelect=False.
Где в коде ошибка, подскажите, пожалуйста.
For i=0 To Form.c_ListBox_0.Items.Count-1 'просматриваем список If Form.c_ListBox_0.Selected(i) Then 'если срока выбрана, то oboz_doc = Form.c_ListBox_0.Items 'присваиваем переменной oboz_doc значение этой строки End If Next
If Form.c_ListBox_0.ItemIndex<>-1 Then Text = Form.c_ListBox_0.Items.Strings(Form.c_ListBox_0.ItemIndex)
Чтобы отправить ответ, вы должны войти или зарегистрироваться
TechnologiCS → TechnologiCS → Использование TechnologiCS API → Заполнение раскрывающегося списка