以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于调用窗口的问题!!  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=45086)

--  作者:heying325
--  发布时间:2014/1/15 12:43:00
--  关于调用窗口的问题!!
Dim ppp As WinForm.Panel = e.Form.Controls("主面板")
Forms("制作普通报价单").Open
Forms("制作普通报价单").Visible = False

Dim ymy As WinForm.Panel = Forms("制作普通报价单").Controls("Panel1")
ppp.AddControl(ymy)
ymy.Dock = Windows.Forms.DockStyle.fill
上面这段代码是我写的在某窗口中调用其他窗口内容,代码在按钮里,可是没点击一次按钮,“制作普通报价单”窗口就会闪一下,很不爽,请问有什么好办法么?
[此贴子已经被作者于2014-1-15 12:43:42编辑过]

--  作者:heying325
--  发布时间:2014/1/15 13:16:00
--  
图片点击可在新窗口打开查看
--  作者:Bin
--  发布时间:2014/1/15 15:12:00
--  
试试看在代码前加入
Forms("XX").StopRedraw

结束后加入

Forms("XX").ResumeRedraw

--  作者:heying325
--  发布时间:2014/1/15 15:53:00
--  
没用啊,还是闪一下!!图片点击可在新窗口打开查看
--  作者:Bin
--  发布时间:2014/1/15 15:54:00
--  
那就没办法了.
--  作者:有点甜
--  发布时间:2014/1/15 20:08:00
--  
 之前遇到过,应该不会闪才对的。这样弄

e.Forms.StopRedraw
forms("窗口1").Open(-1000, -1000)
Forms("窗口1").StopRedraw


结束后加入


Forms("窗口1").ResumeRedraw
e.form.StopRedraw