主题：求助：如何实现当前窗体中的按钮标题 点击后 自动将对应按钮标题的窗体加入窗体呢？目前已经实现单个按钮加入，如何实现通用多个按钮加入，如逛逛老师的那种任务栏名称通用获取。

求助：如何实现当前窗体中的按钮标题 点击后 自动将对应按钮标题的窗体加入窗体呢？目前已经实现单个按钮加入，如何实现通用多个按钮加入，如逛逛老师的那种任务栏名称通用获取。

目前代码如下：（经过自查 我应该是把代码位置放错了地方，当然通用代码也没有写正确，红色部分）

Dim PB As WinForm.Panel = e.Form.Controls("Panel1")

Dim ABC As WinForm.Button = e.Form.Controls("Button1")  

Dim Name As String = abc.Text
Forms(Name).OPEN(-1000,-1000)
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)

Dim Name As String = e.Sender.Text

大红袍老师 根据你在其他帖子中提到的解决窗体加入窗体闪烁问题解决法子

Forms(Name).OPEN(-1000,-1000)

还是会出现闪烁

同时，上述窗体加入窗体中的那代码修正后，应该在放在哪个事件中呢？

而不是单独每个控件都加入CHICK代码

刚刚我测试了下 如果加入按钮控件到任务栏中，再设置导航栏中的点击事件代码，会提示任务栏中没有

.NET Framework 版本：2.0.50727.6419
Foxtable 版本：2014.11.11.1
错误所在事件：窗口,主窗体,NavBar1,Click
详细错误信息：
未找到类型“NavBar”的公共成员“Text”。

在导航栏中加入任务栏，在将按钮加入到任务栏，结果代码不执行。

经过多种方法，都没有实现多个按钮 单独点击后对应弹出窗体，目前只能每个按钮都写入一个点击事件代码，进行加载

求通用加载方法，谢谢

代码放在哪个事件呢？我放在导航栏中的点击事件或放在任务栏中的点击事件都不能实现

此主题相关图片如下：1038.tmp.jpg

如图有两个按钮

在按钮不加入楼上代码 直接在导航栏中加入代码  效果无

是否是我代码放错了位置  还是思路出现了错误

在导航栏中的属性放在代码也没有达到效果

放在控件的click事件啊

每个对应的按钮控件点击事件中啊？这样得每个按钮控件都添加对应代码咯！目前我是这样的，但是感觉按钮多了的话 有些费时

有没有快速操作的方法呢？

至于刚刚提到的窗体闪烁问题 找到了你提供的一个办法

利用如下代码进行了绘制控件解决：

e.Form.StopRedraw()
 '动态增加或删除控件的代码
e.Form.ResumeRedraw()

那你就写到窗口的全局click事件里去。

写在窗口全局点击事件中的话 如果点导航栏就会报错哦

e.sender.SelectedPage.ButtonText

e.sender.Text

以上两个代码写法都会报错  当点导航栏标签的时候。

加入判断

Select Case e.Sender.Name

    case "Button1", "Button2"

End Select