Foxtable(狐表)用户栏目专家坐堂 → 关于显示列的问题


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

主题:关于显示列的问题

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


加好友 发短信
等级:二尾狐 帖子:524 积分:3676 威望:0 精华:0 注册:2012/7/27 10:28:00
  发帖心情 Post By:2015/7/5 20:53:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试项目.table

谢谢

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/6 9:51:00 [只看该作者]

 你目的是什么?

 

Dim r As Row = Tables("表A").Current
If r("第一列") = "1111" Then
    Tables("表A.表B").Cols("第二列").Visible = e.Sender.Checked
ElseIf r("第一列") = "2222" Then
    Tables("表A.表B").Cols("第三列").Visible = e.Sender.Checked
End If


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


加好友 发短信
等级:二尾狐 帖子:524 积分:3676 威望:0 精华:0 注册:2012/7/27 10:28:00
  发帖心情 Post By:2015/7/6 10:56:00 [只看该作者]

是,就是不知道放哪里?

 


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/6 10:57:00 [只看该作者]

CheckedChanged事件

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


加好友 发短信
等级:二尾狐 帖子:524 积分:3676 威望:0 精华:0 注册:2012/7/27 10:28:00
  发帖心情 Post By:2015/7/6 11:02:00 [只看该作者]

没反应图片点击可在新窗口打开查看

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/6 11:04:00 [只看该作者]

 你勾选以后才会有反应啊

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


加好友 发短信
等级:二尾狐 帖子:524 积分:3676 威望:0 精华:0 注册:2012/7/27 10:28:00
  发帖心情 Post By:2015/7/6 11:08:00 [只看该作者]

有没有什么办法,把它放在全局变量里,直接点“1111”或“2222”自动变化啊

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/6 11:14:00 [只看该作者]

以下是引用hongyefor在2015/7/6 11:08:00的发言:
有没有什么办法,把它放在全局变量里,直接点“1111”或“2222”自动变化啊

 

去编写CurrentChanged事件,如

 

Dim r As Row = Tables("表A").Current
If r("第一列") = "1111" Then
    Tables("表A.表B").Cols("第二列").Visible = False
    Tables("表A.表B").Cols("第三列").Visible = True

ElseIf r("第一列") = "2222" Then

    Tables("表A.表B").Cols("第二列").Visible = True
    Tables("表A.表B").Cols("第三列").Visible = False

End If


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


加好友 发短信
等级:二尾狐 帖子:524 积分:3676 威望:0 精华:0 注册:2012/7/27 10:28:00
  发帖心情 Post By:2015/7/6 11:22:00 [只看该作者]

加进去没反应图片点击可在新窗口打开查看

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/6 11:23:00 [只看该作者]

 你选择行才行啊
[此贴子已经被作者于2015/7/6 11:23:05编辑过]

 回到顶部
总数 21 上一页 1 2 3 下一页