Странность с формой и listbox при выборе записи

Upgrader
Дата: 17.12.2011 22:37:47
Я вообще не понимаю почему так... мозг сломал уже.
Нужно перейти на последнюю запись, я пишу это:
Список.Selected(Списокl.ListCount - 1) = True
Работает, выделяется последняя запись и получаю как-бы неактивную форму - ни кнопки формы ни собственно список не реагируют ни на мышь ни на клавиатуру. Рабочей остается только кнопка закрытия окна.
Как так? О_о Точно из-за этого, убираю эту строчку - и все начинает работать нормально.
Upgrader
Дата: 17.12.2011 22:41:00
Точнее единственное - это колесиком мыши прокручивается listbox! Больше ничего нельзя сделать, кроме как сернуть/развернуть/закрыть окно. Как-будто поверх него какое-то активное окно, но их нет, вообще ничего лишнего нет.
Upgrader
Дата: 17.12.2011 22:56:40
Это в Access 97.
Открыл файл в Access 2010 (без преобразования) - там такой проблемы нет.
Но мне именно для 97 нужно.
mds_world
Дата: 17.12.2011 22:59:31
Если код скопирован из модуля, а не написан здесь, то в нем ошибка
Список.Selected(Списокl.ListCount - 1) = True
Upgrader
Дата: 17.12.2011 23:07:00
Нет, это тут я написал. Там ошибки нет.

Решил проблему.
Было так:
Private Sub Form_Open(Cancel As Integer)
Список.RowSource = "..."
Список.Selected(Список.ListCount - 1) = True
End Sub

Убрал
Список.Selected(Список.ListCount - 1) = True
оттуда, в другое место, а именно в Private Sub Список_GotFocus(). Теперь все работает.
mds_world
Дата: 17.12.2011 23:19:17
Каждый раз при получении фокуса, переходить на последнюю запись списка? По-моему, неудачное решение. Вы выбираете значение, отвлеклись на секунду, перешли опять в список и бац! уже опять в конце.

То, что не получилось на событии Open, так и должно было быть. На открытии не все контролы видны. А на Load или Activate уже полное управление. Там и надо ставить.