Access 2010 VBA: если фильтр не соответствует ни одной записи, отобразить «Записи не найдены»

Question

Я бы хотел, чтобы запрос возвращал текст, такой как "Не найдено записей, соответствующих критериям".или подобное, когда нет записей, которые соответствуют введенным критериям.

Я использую Access 2010 и могу использовать VBA или SQL.Я полагаю, что запрос (SQL) - это то место, где его легче всего применить.

Answer 1

Моей первой мыслью было бы сделать что-то вроде этого: *

sql = "SELECT * FROM table WHERE SomeID = 123" 
Set rst = CurrentDb.OpenRecordset(sql)
If rst.recordcount = 0 Then
    Debug.print "Nothing to see, move along"
Else
    ' Do something useful
End If

Если вы используете запрос, встроенный в QBE, вы можете сделать что-то подобное и открыть набор записей, используя хранимый запрос, вместо строки sql.