Ms access 获取表单控件的关联标签的标题-Access 2007
正如标题所示,我正在尝试获取表单控件的相关标签的标题 例如: 显然“ctl.Caption”不起作用,我只是不知道如何引用它 谢谢你的帮助 干杯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的建议,
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