是的,可以使用动态表单名称作为查询生成器下拉列表的条件。下面是一个示例代码:
Private Sub Form_Open(Cancel As Integer) Dim frmName As String
frmName = Me.Name '获取当前表单的名称
Me.cboList.RowSource = "SELECT FieldName FROM TableName WHERE FormName = '" & frmName & "';" '根据表单名称设置下拉列表数据源
End Sub
在上述代码中,“Form_Open”事件用于在打开表单时执行代码。我们使用变量 “frmName” 获取当前表单的名称,并在 SELECT 语句的 WHERE 子句中使用它。在这个例子中,我们假设有一个名为“TableName”的表,其中包含了一个名为“FieldName”的字段和一个名为“FormName”的字段,用于存储表单的名称。
最后,我们将查询结果设置为下拉列表的数据源。这将为下拉列表提供符合条件的数据项。