.FindLast "Цена=100"
MsgBox!Товар & " " &!Цена & " " &!Поставщик
End With
End Sub
Результат:
Пример:
Найти все записи в наборе, удовлетворяющие условию:
Цена>60
Исходная таблица:
Использование метода FindNext, который находит в наборе записей следующую, удовлетворяющую условиям и делает её текущей.
Private Sub Кнопка0_Click()