为什么会提示用户定义类型未定义？ 空件已经引用了

Private Sub cmdOK_Click()
    Dim MyWin As SHDocVw.ShellWindows     Dim MyWin As S