Foxtable(狐表)用户栏目专家坐堂 → 提示信息


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

主题:提示信息

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/18 8:43:00 [显示全部帖子]

提示很明显了,列名用错了。这个代码想实现什么功能?

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/18 9:34:00 [显示全部帖子]

改为需要的列名呀

rtxt.text = Tables("表B").Rows(0)("第五列")

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/18 10:34:00 [显示全部帖子]

您的代码逻辑就是只有选择这3个列才会显示的呀,其它列就关闭了。如果现在其它列也打开窗口,那么窗口显示什么内容呢?


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


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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/18 11:22:00 [显示全部帖子]

AfterOpenProject事件加上代码

            Forms("信息").Show
            Dim rtxt = Forms("信息").Controls("Panel1").basecontrol.Controls("mytxt")
            rtxt.ForeColor = color.Blue
            rtxt.text = Tables("表B").Rows(0)("第五列")

 回到顶部