Doc As MSHTML.HTMLDocument 用户定义类型未定义
在“工程/部件”对话框中勾选：Microsoft Internet Controls
在“工程/引用”对话框中勾选：Microsoft HTML Object Library

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

[解决办法]

VB code

Option ExplicitPrivate Sub Command1_Click()    Dim Doc As MSHTML.HTMLDocumentEnd Sub