Parent 屬性

全部顯示

使用 Parent 屬性可以引用控件、節(jié)或包含其他控件的控件的父對(duì)象。如果父對(duì)象為控件則 Parent 屬性返回的是控件對(duì)象；如果父對(duì)象為 Microsoft Access 對(duì)象，則返回的是 AccessObject 對(duì)象。只讀。

expression.Parent

expression     必需。返回“應(yīng)用于”列表中的一個(gè)對(duì)象的表達(dá)式。

說(shuō)明

在多個(gè)窗體或報(bào)表中插入了子窗體或子報(bào)表時(shí)，可使用 Parent 屬性決定當(dāng)前的父對(duì)象。

例如，可能在一個(gè)窗體和一個(gè)報(bào)表中都插入了“訂單明細(xì)”子窗體。以下示例使用 Parent 屬性來(lái)引用“訂單ID”字段，該字段在主窗體和主報(bào)表中都存在。在子窗體上的綁定控件中可以輸入該表達(dá)式。

=Parent!OrderID

標(biāo)簽控件的 Parent 屬性是標(biāo)簽控件鏈接的控件。選項(xiàng)組中的復(fù)選框、選項(xiàng)按鈕或切換按鈕的 Parent 屬性是選項(xiàng)組控件的名稱(chēng)。選項(xiàng)組控件的 Parent 屬性是窗體的名稱(chēng)。

示例

以下示例使用 Parent 屬性檢查“Speedy Label”標(biāo)簽控件、“Speedy”復(fù)選框控件和“ShipVia”選項(xiàng)組的父對(duì)象。如果要運(yùn)行該示例，請(qǐng)打開(kāi)“羅斯文”示例數(shù)據(jù)庫(kù)中的“訂單”窗體，并運(yùn)行此代碼。

Public Sub ShowParent()

    Dim frm As Form

    Dim ctl As Control

    Set frm = Forms!Orders

    Set ctl = frm.[Speedy Label]

    ' Returns name of control attached to label.

    MsgBox "The parent control is " & ctl.Parent.Name

    Set ctl = frm.Speedy

    ' Returns name of control containing control.

    MsgBox "The parent control is " & ctl.Parent.Name

    Set ctl = frm.ShipVia

    ' Returns name of form containing option group control.

    MsgBox "The parent control is " & ctl.Parent.Name

End Sub

下一個(gè)示例返回的也是包含選項(xiàng)組控件的窗體的名稱(chēng)。

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