Doc As MSHTML.HTMLDocument 用户定义类型未定义

在“工程/部件”对话框中勾选：Microsoft Internet Controls
在“工程/引用”对话框中勾选：Microsoft HTML Object Library

编译时提示 用户定义类型未定义

Option Explicit

Private Sub Command1_Click()
  Dim Doc As MSHTML.HTMLDocument
End Sub


我的显示正常，你重新添加Microsoft HTML Object Library
看看