我正在使用一个数据库来存储一堆动物行为观察数据，并且正在创建一个表单来输入数据（许多表单之一）。主表单输入到名为"FocalSample"的表中，子表单输入到"FocalData"表中。
This is the form at present
该子表单中的一个总体样本中将有多个记录，一个样本的周期为10分钟，并记录了该10分钟内的单个动物行为，并记录了以分钟和秒为单位的时间，以计算每种行为所花费的时间。 / p>
根据在子窗体的"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
但是在第一行之后，我一直收到错误消息。 Here is the error and code screen
与我附加的其他论坛链接类似，我还需要弹出表单从主表单中提取很多信息，但是我很高兴能够使该弹出表单在当前工作。
很抱歉，这么多细节-我在非洲的偏远地区，只能访问互联网，所以我想尽早提供尽可能多的信息！
Example of popup form - you might be able to determine fields that will feed off the focalsample form Another example of a popup form - different behaviour type to the previous
编辑 我已经根据先前的响应对代码进行了调整，但没有收到其他错误。This is the code with the error line highlighted - I am not sure what table name to add if any Error code
答案 0 :(得分：0)
第Select Me.Campaign.Value行应显示为Select Case Me.Campaign.Value。
