Foxtable(狐表)用户栏目专家坐堂 → 跪求一方法


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

主题:跪求一方法

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


加好友 发短信
等级:九尾狐 帖子:2180 积分:13810 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2020/6/21 19:06:00 [显示全部帖子]

直接在代码编辑器里面用tables(b) 替换tables(a)

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


加好友 发短信
等级:九尾狐 帖子:2180 积分:13810 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2020/6/21 23:57:00 [显示全部帖子]

你有没有想过问题出在哪里?
如果你在代码一开头多加一句代码就不用这么麻烦了
Dim T As Table=Tables(a)
.....
.....
......
T.xxx
不管有多少个Tables(a) ,只需要改第一句 Dim T As Table=Tables(b) 就ok了


 

 回到顶部