- 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=148167)
-- 发布时间：2020/4/1 12:17:00
-- 首页取消关闭键
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.foxdb |
-- 发布时间：2020/4/1 12:49:00
--
有老师在吗？帮忙看一下
-- 发布时间：2020/4/1 14:05:00
--
全局代码
Public Sub _TabPageClosing(sender As Object, e As C1.Win.C1Command.TabPageCancelEventArgs)
\'页面关闭按钮点击事件
Dim name = e.TabPage.Text
If name = "首页" Then
e.Cancel = True
End If
End Sub
窗口afterload
Dim t As C1Command.C1DockingTab = e.Form.Controls("TabControl1").BaseControl
t.CanCloseTabs = True
t.CloseBox = 2
AddHandler t.TabPageClosing, AddressOf _TabPageClosing
-- 发布时间：2020/4/1 18:11:00
--
这个只是关闭的时候触发不让关闭，我是想去掉上面的叉?
[此贴子已经被作者于2020/4/1 18:11:41编辑过]
-- 发布时间：2020/4/2 6:55:00
--
能去掉首页上面的叉吗？其他保留
-- 发布时间：2020/4/2 10:21:00
--
无法去掉