以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=78704)
--  作者：ljh29206
--  发布时间：2015/12/15 15:01:00
--  请教问题
Dim PB As WinForm.Panel = forms("mainform").Controls("Panel1")
Dim Name As String = e.Link.Name
forms("mainform").StopRedraw()

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)
forms("mainform").Controls("窗口标题").text = name
forms("mainform").ResumeRedraw()

以上代码 把  独立窗体   放到  panel 里面


2个问题
1： 发现系统闲置时间长了 执行 TopicBar1 上的  TopicLinkClick 时间  以上代码    会看不到  面板刷新

2： 每次转换面板时 ，好像  焦点都不在  系统的面板上 ， 这个该怎么搞？
--  作者：大红袍
--  发布时间：2015/12/15 15:16:00
--  

1、

 

Forms(name).Close

Forms(name).OPEN(-1000,-1500)

 

2、什么意思，上传例子。