ник: ser60
Поставил на открытие формы на отсутствие данных код
Private Sub Form_Open(Cancel As Integer)
If Me.RecordsetClone.RecordCount = 0 Then MsgBox "Нет данных!" , vbOKOnly + vbInformation
Cancel = True
End Sub
|
Видно, что акс отрабатывает (Обработка команды...), но MsgBox не показывается. В чем может быть причина? Из-за содержащейся там подформы?