Access VBA教程:Parent属性

使用 Parent属性可以引用控件、节或包含其他控件的控件的父对象。如果父对象为控件则 Parent属性返回的是控件对象;如果父对象为Microsoft Access对象,则返回的是AccessObject对象。只读。

expression.Parent

expression   必需。返回“Applies To”列表中的一个对象的表达式。

说明

在多个窗体或报表中插入了子窗体或子报表时,可使用 Parent属性决定当前的父对象。

例如,可能在一个窗体和一个报表中都插入了“订单明细”子窗体。以下示例使用 Parent属性来引用“订单ID”字段,该字段在主窗体和主报表中都存在。在子窗体上的绑定控件中可以输入该表达式。


=Parent!OrderID

标签控件的 Parent属性是标签控件链接的控件。选项组中的复选框、选项按钮或切换按钮的 Parent属性是选项组控件的名称。选项组控件的 Parent属性是窗体的名称。

VBA示例

以下示例使用 Parent属性检查“Speedy Label”标签控件、“Speedy”复选框控件和“ShipVia”选项组的父对象。如果要运行该示例,请打开“罗斯文”示例数据库中的“订单”窗体,并运行此代码。


Public Sub ShowParent()
    Dim frm As Form
    Dim ctl As Control
     Set frm = Forms!Orders
    Set ctl = frm.[Speedy Label]
     ' 返回标签上所附控件的名称。
    MsgBox "父控件为 " & ctl.Parent.Name
    Set ctl = frm.Speedy
     ' 返回含有控件的控件的名称。
    MsgBox "父控件为 " & ctl.Parent.Name
    Set ctl = frm.ShipVia
     ' 返回含有选项组控件的窗体的名称。
    MsgBox "父控件为 " & ctl.Parent.Name
End Sub

下一个示例返回的也是包含选项组控件的窗体的名称。


MsgBox Forms!Orders![Speedy Label].Parent.Parent.Parent.Name

上页:Access VBA教程:PaperSize属性 下页:Access VBA教程:Path属性

Access VBA教程:Parent属性

Access VBA教程:Path属性 Access VBA教程:Picture属性
Access VBA教程:PictureAlignment属性 Access VBA教程:PictureData属性
Access VBA教程:PicturePages属性 Access VBA教程:PictureSizeMode属性
Access VBA教程:PictureTiling属性 Access VBA教程:PictureType属性
Access VBA教程:PivotTable属性 Access VBA教程:PivotTableChange属性
Access VBA教程:PopUp属性 Access VBA教程:Port属性
Access VBA教程:PostalAddress属性 Access VBA教程:PreviousControl属性
Access VBA教程:PrintCount属性 Access VBA教程:Printer属性
Access VBA教程:Printers属性 Access VBA教程:PrintQuality属性
Access VBA教程:PrintSection属性 Access VBA教程:ProcBodyLine属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号