Access VBA - Показать данные строки таблицы в Msgbox
Я довольно новичок в программировании с Access VBA, и я не смог найти нигде, который мог бы помочь мне с этой проблемой.
Я работаю с таблицей, которая содержит список почтовых индексов для района Лондона. У меня есть список из 2248 почтовых индексов, и для каждого почтового индекса у меня есть ссылка на кластер. например
N1 1AS | A N16 5DF | F
и так далее.
Моя проблема, когда я хочу отобразить информацию о кластере. Я пробовал поле со списком, но, кажется, есть ограничение и оно составляет около 100 почтовых индексов. Я хотел бы закодировать команду, которая будет срабатывать, как только кто-то введет почтовый индекс, появится окно сообщения и отобразит кластер этого почтового индекса.,
Так, например, я набираю N1 1AS в поле Почтовый индекс, и он будет отображаться в окне сообщения.
Спасибо за всю вашу помощь,
Гарет Джонс
1 ответ
Поместите кнопку рядом с текстовым полем, и событие OnClick будет выглядеть примерно так:
Dim X as String
X = DLookUp("tblPostcodes", "fldCluster", "fldPostCode = '" & Me.txtPostCode & "'")
msgbox "The Cluster is " & X
Это может потребовать небольшой доработки, но это должно приблизить вас.
РЕДАКТИРОВАТЬ: Вы могли бы поместить его в событие LostFocus в текстовом поле, но я не фанат этого, потому что, если кто-то решит щелкнуть мышью из коробки по какой-то причине, он попытается выполнить код в любом случае, и он будет просто небрежным.