以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  我用了这段代码以后,电脑死机  (http://foxtable.net/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