GetInheritedOwner
返回控件的继承所有者对象。
语法:GetInheritedOwner( Value ) As Object
- Value
- 必需 Object。要获取其继承所有者的控件。
对于参与控件容器层次结构的控件,继承所有者是提供环境设置的最上层拥有对象——通常是窗体。当没有设置继承所有者时返回Nothing。
示例
本示例读取控件的最上层容器并报告其类型。
vb
' Inside a VB control class
Dim host As Object
host = GetInheritedOwner(Me)
If Not host Is Nothing Then
Debug.Print "Container: " & TypeName(host)
End If