温馨提示:本文翻译自stackoverflow.com,查看原文请点击:vba - MS Access
ms-access vba

vba - MS Access

发布于 2020-04-07 23:52:32

我有一个经典表单和一个子表单,该表单从查询中获取记录,并且我想为该子表单使用的查询名称分配一个变量:

Dim qryVar as String
qryVar = Me.subForm1.Query.Name

这当然行不通..

查看更多

提问者
Alex
被浏览
32
Warcupine 2020-02-01 04:08

在父表单的代码中

Sub Test()
    Dim qryVar as string
    qryVar = Me.Controls("SubForm1").Form.RecordSource
    debug.print qryVar
End Sub

在模块代码中调用测试

Sub TestFormCode()
     Frm_ParentFormObject.Test 'Change this to whatever your form's name is
End Sub