主题：[求助]PAN 添加名称和关闭按钮及单击事件

直接在窗口里设置下面的代码啊！

老师，

  将代码放到Click  事件，有屏幕闪动的情况，先不出现关闭按钮，再点击一遍，不闪动才能出现关闭按钮；添加e.Form.StopRedraw，又发现点击就重复下面的操作，按钮不能很好的出现，该怎么做呢

Select Case e.Sender.name
    Case "p1","p2"
        e.Form.StopRedraw
        _SysCloseBut.Top = 6
        '_MainPagesTabBackColorSelected =e.Sender.BackColor
        _SysCloseBut.left = e.Sender.width - _SysCloseBut.width - 6
        e.Form.ResumeRedraw
        e.Sender.basecontrol.Controls.add(_SysCloseBut)
        
    End Select

 上传具体实例说明。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:tabcontrol关闭按钮+pan.table

测试步骤，打开窗口，点击红色的PANL 闪动（可能是PANL大小变化影响），没有关闭按钮；再次点击红色的PANL 才会出现关闭按钮。

刚才测试点击红色的PANL有关闭按钮的时候，鼠标移到tabPage 上再移回到PANL时，PANL关闭按钮也是消失了？ 希望关闭按钮和鼠标点击的控件保持一致。

 弄这么复杂干嘛，你就不能在panel里面添加一个picturebox控件？控制好picturebox的显示和隐藏即可。

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:tabcontrol关闭按钮+pan.table

老师，

   24楼的能给改下吗？

其实，界面中页面中的不同位置，渴望新奇和高大上的东西。

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:tabcontrol关闭按钮+pan (1).table

老师

放到我这里，下列代码应该是哪里错误

click 代码

 

e.Form.controls(“p1”).basecontrol.controls.Remove(e.Form.controls(“p1”).basecontrol.controls("pnlsys_title_p1" ))