Иллюстрированный самоучитель по Access 2002


         

Листинг 13.6. Процедура обработки события Отсутствие данных отчета


Private Sub Report_NoData(Cancel

As

Integer)

MsgBox "He найдены записи, удовлетворяющие указанным_

условиям.", vbExclamation, "Записи не найдены"

rstReport.Close Cancel = True

End Sub

CompEbook.ru Железо, дизайн, обучение и другие




Содержание  Назад  Вперед