IShellDispatch.Parent 属性

检索表示当前 对象的父对象的 对象。

此属性为只读。

语法

objParent = IShellDispatch.Parent

Property Parent As Object

属性值

接收父对象的 IDispatch 类型的变量。

备注

此属性通过 Shell.Parent 属性实现和访问。

示例

以下示例演示了在 JScript、VBScript 和 Visual Basic 中使用 Parent 。

Jscript：

<script language="JScript">
    function fnShellParentJ()
    {
        var objShell = new ActiveXObject("shell.application");
        var objParent;

        objParent = objshell.Shell_Parent;
        if (objParent != null)
        {
            alert("Got parent property");
        }
    }
</script>

VBScript：

<script language="VBScript">
    function fnShellParentVB()
        dim objShell
        
        set objShell = CreateObject("shell.application")
            if (not objShell is nothing) then
                dim objParent

                set objParent = objshell.Parent
                    if (not objParent is nothing) then
                        alert("Got parent property")
                    end if
                set objParent = nothing
            end if
        set objShell = nothing
    end function
 </script>

Visual Basic：

Private Sub fnShellParentVB()
    Dim objShell As Shell
    
    Set objShell = New Shell
        If (Not objShell Is Nothing) Then
            Dim objParent As Object
            
            Set objParent = objshell.Parent
                If (Not objParent Is Nothing) Then
                    Debug.Print "Got parent object"
                End If
            Set objParent = Nothing
        End If
    Set objShell = Nothing
End Sub

要求

要求	值
最低受支持的客户端	Windows 2000 专业版、Windows XP [仅限桌面应用]
最低受支持的服务器	Windows 2000 Server [仅限桌面应用]
标头	Shldisp.h
IDL	Shldisp.idl
DLL	Shell32.dll (4.71 或更高版本)