看了你的提问我也有了疑问：
1.htm有几个？
Set mICustomDoc = Me.WebBrowser1.Document
mICustomDoc.SetUIHandler Me
这个代码里面，SetUIHandler方法来自何方？可能是你自己写了个加强型类模块？
看到“（这个页面结构我是无权限改动的，我只有权限改动vb中的代码）”这句我就望而却步了，我的办法是废弃掉HTM文件里的所有执行代码，HTM文件只负责布局，执行代码都集中到VB程序里。
还有个办法是找到mICustomDoc.SetUIHandler Me的逆操作，文本框（如果能）取得焦点，就采取该逆操作，使得文本框能够输入。文本框取得焦点的时候最好添加个遮布来屏蔽页面其他元素，如果这样，文本框也就不如没有好。
Public Sub test2(str)
msgbox str
改成一个空函数试试，说不定与msgbox 有关系
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024