Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口表的行事件和列事件


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

主题:[求助]窗口表的行事件和列事件

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


加好友 发短信
等级:四尾狐 帖子:970 积分:8638 威望:0 精华:0 注册:2012/10/3 13:25:00
[求助]窗口表的行事件和列事件  发帖心情 Post By:2017/9/26 16:24:00 [只看该作者]

我在窗口表设置了行事件,用以打开右边不同的页签;同时,我想当点击表格最后一列时,打开最右边的页签,见图: 

  

CurrentChanged事件代码:

If e.Table.Current Is Nothing Then Return

If e.Table.Current("审判程序") = "一审" Then

    Forms("送达管理").Controls("TabControl1").SelectedPage = Forms("送达管理").Controls("TabControl1").TabPages("一审")

ElseIf e.Table.Current("审判程序") = "二审" Then

    Forms("送达管理").Controls("TabControl1").SelectedPage = Forms("送达管理").Controls("TabControl1").TabPages("二审")

Else       'If e.Table.Current("审判程序") = "行审" Then

    Forms("送达管理").Controls("TabControl1").SelectedPage = Forms("送达管理").Controls("TabControl1").TabPages("行审")

End If


这段代码怎么用:

If e.Col.Name = "信件信息" Then

    Forms("送达管理").Controls("TabControl1").SelectedPage = Forms("送达管理").Controls("TabControl1").TabPages("信件信息")

End If


图片点击可在新窗口打开查看此主题相关图片如下:截屏图片.jpg
图片点击可在新窗口打开查看

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


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

你可以编写click事件

 

If e.Col.Name = "信件信息" Then

    Forms("送达管理").Controls("TabControl1").SelectedPage = Forms("送达管理").Controls("TabControl1").TabPages("信件信息")

End If


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


加好友 发短信
等级:四尾狐 帖子:970 积分:8638 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/9/26 18:28:00 [只看该作者]

我是这么做的,没反应,才来请教的。
我感觉代码有冲突,因为点击最后一列时,同时触发了两个事件。
但自己改不了。

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


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

currentChanged事件

 

If e.Table.Current Is Nothing Then Return

If e.Table.cols(e.table.colsel).name = "信件信息" Then Return

 


 回到顶部