Foxtable(狐表)用户栏目专家坐堂 → 如何做出类似“商家宝进销存”的选项卡?


  共有14350人关注过本帖树形打印复制链接

主题:如何做出类似“商家宝进销存”的选项卡?

帅哥哟,离线,有人找我吗?
有点甜
  31楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/7 14:23:00 [只看该作者]

以下是引用花开的声音在2015-1-7 13:46:00的发言:

请教下,那我要关闭某个并列窗口时,代码写在哪个事件里?

 

在需要关闭的时候直接写 Forms("窗口1").Close


 回到顶部
帅哥哟,离线,有人找我吗?
晕了快扶我
  32楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1195 积分:7046 威望:0 精华:0 注册:2013/3/4 18:02:00
  发帖心情 Post By:2015/1/7 14:30:00 [只看该作者]

以下是引用花开的声音在2015-1-7 13:46:00的发言:

请教下,那我要关闭某个并列窗口时,代码写在哪个事件里?

afteropenproject


 回到顶部
帅哥哟,离线,有人找我吗?
花开的声音
  33楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8418 威望:0 精华:0 注册:2012/10/29 20:09:00
  发帖心情 Post By:2015/1/7 15:12:00 [只看该作者]

比如,我想双击某个并列窗口的窗口标签时关闭这个窗口呢,写在哪个事件里?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  34楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/7 15:25:00 [只看该作者]

以下是引用花开的声音在2015-1-7 15:12:00的发言:
比如,我想双击某个并列窗口的窗口标签时关闭这个窗口呢,写在哪个事件里?

 

做不到了,之前可以,现在不能绑定事件了。


 回到顶部
帅哥哟,离线,有人找我吗?
花开的声音
  35楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8418 威望:0 精华:0 注册:2012/10/29 20:09:00
  发帖心情 Post By:2015/1/7 15:31:00 [只看该作者]

以下是引用有点甜在2015-1-7 15:25:00的发言:

 

做不到了,之前可以,现在不能绑定事件了。

那我想通过标签来关闭这个窗口,怎么弄,变通一下也行?


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  36楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/7 15:38:00 [只看该作者]

以下是引用花开的声音在2015-1-7 15:31:00的发言:

那我想通过标签来关闭这个窗口,怎么弄,变通一下也行?

 

无法变通,做不到的。


 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  37楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2015/1/7 16:18:00 [只看该作者]

可以吧!

 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  38楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2015/1/7 16:24:00 [只看该作者]

并列窗口放上这么一段代码:

Dim Tcl As C1.Win.C1Command.C1DockingTab = e.Form.panel.parent.parent
AddHandler Tcl.DoubleClick, AddressOf C1DockingTab_DoubleClick


全局代码代码是这个

Public Sub C1DockingTab_DoubleClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
Functions.Execute("DoubleClickColse1",e,Sender)   '这个是函数
End Sub


函数的写法:

Dim e As System.EventArgs = Args(0)
Dim Sender As Object = Args(1)
Dim frm As WinForm.Form = Forms.ActiveForm
If frm IsNot Nothing Then
        Forms(frm.Name).Close
    End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  39楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/7 16:27:00 [只看该作者]

以下是引用blackzhu在2015-1-7 16:18:00的发言:
可以吧!

 

嗯嗯,是可以。类型我转错了。


 回到顶部
帅哥哟,离线,有人找我吗?
花开的声音
  40楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8418 威望:0 精华:0 注册:2012/10/29 20:09:00
  发帖心情 Post By:2015/1/7 16:48:00 [只看该作者]

谢谢两位大仙!!

 回到顶部
总数 70 上一页 1 2 3 4 5 6 7 下一页