Как при открытии формы установит список (listbox) на нужную запись?

@trimers · Регистрация: 21.12.2014

Author24 — интернет-сервис помощи студентам

Доброго времени суток, уважаемые гуру!
Есть ленточная форма Поиск, в которой при DblClick по полю FIO открывается другая форма Form2.
В Form2 добавлена навигация через listbox [список22] и [список20].
Как сделать, чтобы при открытии Form2 на нужной записи [список22] и [список20] тоже показывали значения переданные из формы Поиск?
P.S. Помню, несколько недель назад мне попадался уже подобный вопрос, но половина ночи, проведенная за поиском той темы, не принесла результатов

mobile · 08.02.2015, 11:22

Сообщение от trimers

Как сделать, чтобы при открытии Form2 на нужной записи [список22] и [список20] тоже показывали значения переданные из формы Поиск?

Создайте в Form2 процедуру загрузки (Load) и в ней пропишите код

Visual Basic

Private Sub Form_Load()
    MySub
    Me.Список22 = Me.группа
    Список22_AfterUpdate
    Me.Список20 = Me.Код
End Sub

Добавлено через 7 минут
И еще. Из модуля в форме Поиск, в процедуре FIO_DblClick удалите команду Form_Form2.MySub. Она там не нужна. Процедуру MySub резонно выполнять в самой форме Form2. Правда, с проверкой на OpenArgs. Поправим Load

Visual Basic

Private Sub Form_Load()
    If Len(Me.OpenArgs & "") = 0 Then Exit Sub
    MySub
    Me.Список22 = Me.группа
    Список22_AfterUpdate
    Me.Список20 = Me.Код
End Sub

	08.02.2015, 11:22