以文本方式查看主题

-  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=63272)
--  作者：as2517
--  发布时间：2015/1/17 15:00:00
--  我用了这段代码以后，电脑死机
我用了这段代码以后，在预览窗口的时候经常电脑死机是咋回事，谢谢老师  放在AfterLoad里

Dim PB As WinForm.Panel = e.Form.Controls("Panel2")
Dim Name As String = "8"  \'只要修改一下这里就行 ,窗口的名称
Forms(Name).OPEN(-1000,-1500)
Forms(Name).BaseForm.TopLevel = False
Forms(Name).BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Forms(Name).BaseForm.Dock = System.Windows.Forms.DockStyle.Fill

PB.BaseControl.Controls.Clear
PB.BaseControl.Controls.add(Forms(Name).BaseForm)
[此贴子已经被作者于2015-1-17 15:00:13编辑过]
--  作者：Bin
--  发布时间：2015/1/17 15:21:00
--  

PB.BaseControl.Controls.Clear
PB.BaseControl.Controls.add(Forms(Name).BaseForm)   一句句代码排除看看是那句代码造出的问题
--  作者：逛逛
--  发布时间：2015/1/17 15:25:00
--  

有这段代码的窗口时不能预览的，只能应用

 

因为预览的时候是模式窗口，要等到窗口关闭才会执行后续的代码
--  作者：as2517
--  发布时间：2015/1/17 16:07:00
--  
谢谢2位老师，是PB.BaseControl.Controls.add(Forms(Name).BaseForm) 这段代码的问题，我想打开窗口的时候自动显示某个窗口所以在AfterLoad加了上面那段代码。就出问题了，不知道如何解决。程序上传请几位老师帮忙解决一下 谢谢。
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1_201501171602.zip
--  作者：as2517
--  发布时间：2015/1/17 17:11:00
--  
求老师帮帮忙
--  作者：lsy
--  发布时间：2015/1/17 18:36:00
--  
请看：
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table
--  作者：有点甜
--  发布时间：2015/1/18 9:42:00
--  

 看3楼。

 

 或者代码写到 TimerTick 事件 http://www.foxtable.com/help/topics/1301.htm