Всплывающая форма MS Access зависит от значения поля со списком - PullRequest
0 голосов
/ 18 января 2019

Я работаю над базой данных для хранения кучи данных наблюдений за поведением животных и работаю над созданием формы для ввода данных (одна из многих форм). Основная форма подается в таблицу с именем "FocalSample", а подчиненная форма - в таблицу "FocalData". Это форма в настоящее время В подчиненной форме будет несколько записей для одной всеобъемлющей выборки, для выборки длится 10 минут, а поведение отдельных животных документируется в течение этих 10 минут с указанием времени в минутах и ​​секундах для расчета продолжительности времени, затраченного на каждое поведение.

Мне нужны всплывающие формы в зависимости от того, что выбрано в поле "Behaviour Type" подчиненной формы, поскольку тип данных, записанных для наблюдения "feed", по сравнению с наблюдением "social" очень отличается. Я создал отдельные таблицы для разных типов поведения данных и форм, которые установлены как "popup", но мне нужна помощь с кодом, чтобы он делал то, что мне нужно! : P

Я пробовал вариант следующего кода, который я нашел здесь (http://www.justskins.com/forums/pop-up-form-based-238440.html)

Private Sub Campaign_AfterUpdate()
Dim strFormName As String
Select Me.Campaign.Value
Case "In Honor", "In Memory"
strFormName = "HonorMemory"
Case "In-Kind"
strFormName = "InKind"
End Select
DoCmd.OpenForm strFormName, , , , , acDialog
End Sub

Но я продолжаю получать сообщение об ошибке после первой строки. Вот экран ошибки и кода

По аналогии с другой ссылкой на форум, которую я прикрепил, мне также нужна всплывающая форма для извлечения большого количества информации из основной формы, но я был бы просто рад, если всплывающие формы будут работать в данный момент.

Извините за столь подробную информацию - я нахожусь в отдаленном районе Африки, и у меня ограниченный доступ к Интернету, поэтому я стараюсь сообщить как можно больше информации заранее

Пример всплывающей формы - возможно, вы сможете определить поля, которые будут заполнены формой focalsample Другой пример всплывающей формы - тип поведения, отличный от предыдущего

EDIT Я перенес код, основанный на предыдущем ответе, но не получаю другую ошибку. Это код с выделенной строкой ошибки - я не уверен, какое имя таблицы добавить, если есть Код ошибки

1 Ответ

0 голосов
/ 18 января 2019

Строка Select Me.Campaign.Value должна читаться как Select Case Me.Campaign.Value.

...