Foxtable(狐表)用户栏目专家坐堂 → [求助]当前行联动页签事件代码没反应


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

主题:[求助]当前行联动页签事件代码没反应

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


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
[求助]当前行联动页签事件代码没反应  发帖心情 Post By:2017/9/14 16:51:00 [只看该作者]

窗口表的Current事件,根据当前行[审判程序]值不同,打开不同页签,但没反应:

 

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("二审")

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

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

End If


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


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

加入msgbox代码,看弹出什么

 

msgbox(e.Table.Current("审判程序"))

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

 

 


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


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

第一个显示当前行的列值;第二个显示true或false。


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


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


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

 做个例子发上来。

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


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

是开发板的:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:事务管理-开发版.foxdb


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


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

设置tabpage的名称

 

 


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

 回到顶部