以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口关闭没,无法调用控件XXX  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=68454)

--  作者:13865161910
--  发布时间:2015/5/18 14:36:00
--  窗口关闭没,无法调用控件XXX
如题,关闭窗口类型为“主窗口的” 窗体,提示如下图,

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150518142531.png
图片点击可在新窗口打开查看

窗口事件——afterload 中为webbrowser控件设计如下代码
以下内容为程序代码:

1 Dim web As windows.Forms.webbrowser = e.Form.Controls("WebBrowser1").basecontrol
2 \'web.OfficeToolBar = True
3 web.ScriptErrorsSuppressed = True
4 addhandler web.DocumentCompleted, addressof web_DocumentCompleted
5 addhandler web.NewWindow, addressof web_NewWindow

全局事件——click中为webbrowser控件设计如下代码

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150518142620.png
图片点击可在新窗口打开查看


请问,如何解决???  此代码设计的目的是为了在webbrowser控件中显示二级页面及三级页面,为何关闭主窗口后,会有如图一的提示?需要如何修改代码?

--  作者:Bin
--  发布时间:2015/5/18 14:37:00
--  
窗口关闭后,就无法调用里面的控件了.
--  作者:13865161910
--  发布时间:2015/5/18 14:42:00
--  回复:(Bin)窗口关闭后,就无法调用里面的控件了.
Bin版,我知道不能调用哇,我意思 如何修改代码 让其不在跳出该提示,是否需要做一个判断?
--  作者:Bin
--  发布时间:2015/5/18 14:44:00
--  
if forms("XX").opened then \'窗口已经打开
   再执行代码
end if 

--  作者:13865161910
--  发布时间:2015/5/18 14:45:00
--  
狐爸说,这不是BUG ,如果需要复用,可使用内部函数,这个就不太懂了如何操作了。
我想在网页控件里面打开二级页面 甚至三级页面,主题中的代码是否有问题? 

--  作者:13865161910
--  发布时间:2015/5/18 14:47:00
--  回复:(Bin)if forms("XX").opened then '窗口已经打...
额  原来是代码写错了,写成close了,难怪测试出错

谢谢bin版