Ms access 获取表单控件的关联标签的标题-Access 2007

Ms access 获取表单控件的关联标签的标题-Access 2007,ms-access,ms-access-2007,Ms Access,Ms Access 2007,正如标题所示,我正在尝试获取表单控件的相关标签的标题 例如: 显然“ctl.Caption”不起作用,我只是不知道如何引用它 谢谢你的帮助 干杯 Noel发现答案是使用控制项(0)。说明 我发现答案是使用ctl.Controls.Item(0.Caption) 仅当标签附着到控件时,此操作才有效。还请注意,某些控件类型(如选项组)有多个控件,理论上,.Controls(0)可能不是选项组的标签。当然,您可以使用ctl.Controls(0).Caption,而不需要项()。感谢David的建议,

正如标题所示,我正在尝试获取表单控件的相关标签的标题 例如:

显然“ctl.Caption”不起作用,我只是不知道如何引用它

谢谢你的帮助

干杯


Noel发现答案是使用控制项(0)。说明


我发现答案是使用ctl.Controls.Item(0.Caption)


仅当标签附着到控件时,此操作才有效。还请注意,某些控件类型(如选项组)有多个控件,理论上,.Controls(0)可能不是选项组的标签。当然,您可以使用ctl.Controls(0).Caption,而不需要项()。感谢David的建议,这是我完全忽略的一点。只有将标签附加到控件上时,这才有效。还请注意,某些控件类型(如选项组)有多个控件,理论上,.Controls(0)可能不是选项组的标签。当然,您可以使用ctl.Controls(0).Caption而不需要Item()。感谢David的建议,这是我完全忽略的一点。
Dim ctl As Control
Dim errMess As String
errMess = ""
For Each ctl In frm
    With ctl
            If (ctl.Tag = "*") Then
        errMess = errMess & ctl.Caption & vbNewLine        
            End If
        End If
   End With
Next ctl 
Dim ctl As Control
Dim errMess As String
errMess = ""
For Each ctl In frm
    With ctl
            If (ctl.Tag = "*") Then
        errMess = errMess & ctl.Controls.Item(0).Caption & vbNewLine        
            End If
        End If
   End With
Next ctl