在代码中
定义了一个这样的变量
Dim myXmlHttp As XMLHTTP

W10系统提示“用户定义类型未定义”，W7没有问题。请高手指点下~

检查系统目录里msxml4.dll文件是否存在，不存在则试下从win7中拷贝过去（不一定能兼容）

找到这么一段，不知道对你有没有帮助。

----------------------------------------------------------------------------------------------------------------------------------------------
                VB6.0使用winHttp.dll访问webApi

    问题背景：需要用VB编程访问webApi，web方使用的是https的协议。

    开始我用xmlhttp方式访问,失败。后网上搜索发现xmlhttp不支持https的方式。于是采用winHttp.dll。
    由于我测试时候使用的是win7系统，测试顺利通过。用户环境都是xp环境，结果发现返回值失败。

后来验证发现：
    如果用引用方式，win7+win10+xp系统都能正常访问。
    之前win10,win7能正常访问，xp系统访问失败。是因为采用动态创建winhttp对象。
----------------------------------------------------------------------------------------------------------------------------------------------