我有一个名为DisplayForm的表单。在该表单中是一个组合框下拉列表,位于表单上的列顶部,标签通常位于该列的顶部。我想从该下拉菜单中选择一个项目并使用该位数据打开另一个表单。我从网上复制了一个例子,更改了名称,无法使其工作。这是代码;
If Not Me.NewRecord Then
DoCmd.OpenForm "AreaForm", _
WhereCondition:="LArea=" & Me.AreaCBDrop
End If
Area是查询中字段的名称,该字段是表单的记录源,但是当我运行它时,它会打开一个msgbox,要求我输入peramater值。我也不明白IF是什么。我试过这个有和没有if但得到相同的结果。 Me.AreaCBDrop中包含正确的值,但哪里不起作用。
由于
由于
答案 0 :(得分:1)
您的WHERE
条件需要一个文本参数,但您没有提供预期的格式,因此需要一个。
使用单引号包围您的Me.AreaCBDrop
,如下所示:
If Not Me.NewRecord Then
DoCmd.OpenForm "AreaForm", _
WhereCondition:="LArea='" & Me.AreaCBDrop & "'"
End If