Непонятка с Load\Unload формы

[Dummiel]

И снова я, не подумайте за спам! Ишшо одна заморочка.

Проект сделан по типу MDI-формы. Из меню родительской вызываю дочернюю (frmVvod - данные на клиента), в Form_Load()
которой делаю проверку на наличие записей в одной из таблиц БД (фамилии сотрудников). Коли они есть, заряжаю ими ComboBox.
Но если прога запускается в первый раз, то, естественно, никаких сотрудников в БД еще нет, их нужно заносить через меню
"Сервис\Редактирование справочников".

Проверка обычная:

sSQL = "SELECT * FROM Sotrudnik ORDER BY Famil"
Set dbRs = dbBD.OpenRecordset(sSQL)

If dbRs.RecordCount = 0 Then
MsgBox "Список сотрудников пуст!"
Exit Sub
End If

Задача - если список пуст, то нехай тот юзер идет в справочники и запишет хоть одного сотрудника, который будет
обслуживать клиентов предприятия. А вот форму мне показывать незачем, не то тупой юзер (бывают такие еще) будет
заполнять данные на клиента, а обслуживать его будет некому. А форма все равно показывается после Exit Sub.
А если я делаю If dbRs.RecordCount = 0 Then Unload Me, то VB выдает ошибку выполнения: показывает родительскую форму,
откуда я вызываю дочернюю, и кричит - объект уже выгружен. Причем программа останавливается как раз на frmVvod.Show.

Это как понять? Или в мозгах чего подправить?

С уважением - Dummiel.

[Tanya]

может быть вместо

frmVvod.Show

нужно было написать

sSQL = "SELECT * FROM Sotrudnik ORDER BY Famil"
Set dbRs = dbBD.OpenRecordset(sSQL)

If dbRs.RecordCount = 0 Then
MsgBox "Список сотрудников пуст!"
else
frmVvod.Show
End If

[Dummiel]

Елы-палы!

Мозги оказывается нужны для того, чтобы ими думать!!!
Только отправил этот вопрос, как тут же посетила мысля - просто проверку нужно делать из родительской формы! Как только проверил все из родительской формы, и по условию начал вызывать дочернюю, так все и заработало!

Спасибо за совет!

[clickhere]

Есть путь поставить проверку в дочерней форме не в Form_Load() а в Form_Activate()