Foxtable(狐表)用户栏目专家坐堂 → 代码求解


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

主题:代码求解

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


加好友 发短信
等级:一尾狐 帖子:437 积分:2949 威望:0 精华:0 注册:2011/3/15 12:49:00
代码求解  发帖心情 Post By:2019/1/25 20:45:00 [只看该作者]

如果表A,表B,表C,表D,表E,表F,任何一个或者多个表未加载或者全部表都加载,则除未加载的表外其余表全部卸载
其中表A和表E,表F各关联

请问这个代码怎么写最简单

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/1/25 21:47:00 [只看该作者]

Dim ns As String = ""

For Each dt As DataTable In DataTables
    ns = ns & "| " & dt.Name
Next
ns = ns.Trim("|")
DataTables.Unload(ns)

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


加好友 发短信
等级:一尾狐 帖子:437 积分:2949 威望:0 精华:0 注册:2011/3/15 12:49:00
  发帖心情 Post By:2019/1/25 21:58:00 [只看该作者]

项目里还有其他的表啊,这样的全部变不加载了
我的意思是只针对表A,表B,表C,表D,表E,表F,其他的表无关,比如表G和表H,原来咋样现在还是咋样

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/1/25 22:09:00 [只看该作者]

Dim ns() As String = {"表A","表B","表C","表D","表E","表F"}
Dim n As String = ""
For Each n1 As String In ns
    If DataTables.Contains(n1) Then n = n & "| " & n1
Next
n = n.Trim("|")
DataTables.Unload(n)
[此贴子已经被作者于2019/1/25 22:30:19编辑过]

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


加好友 发短信
等级:一尾狐 帖子:437 积分:2949 威望:0 精华:0 注册:2011/3/15 12:49:00
  发帖心情 Post By:2019/1/25 22:21:00 [只看该作者]

不行啊

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


加好友 发短信
等级:一尾狐 帖子:437 积分:2949 威望:0 精华:0 注册:2011/3/15 12:49:00
  发帖心情 Post By:2019/1/25 22:25:00 [只看该作者]


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

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/1/25 22:30:00 [只看该作者]

Dim ns() As String = {"表A","表B","表C","表D","表E","表F"}
Dim n As String = ""
For Each n1 As String In ns
    If DataTables.Contains(n1) Then n = n & "| " & n1
Next
n = n.Trim("|")
DataTables.Unload(n)
[此贴子已经被作者于2019/1/25 22:30:10编辑过]

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


加好友 发短信
等级:一尾狐 帖子:437 积分:2949 威望:0 精华:0 注册:2011/3/15 12:49:00
  发帖心情 Post By:2019/1/25 22:47:00 [只看该作者]

不存在名为“”的表图片点击可在新窗口打开查看

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


加好友 发短信
等级:一尾狐 帖子:437 积分:2949 威望:0 精华:0 注册:2011/3/15 12:49:00
  发帖心情 Post By:2019/1/25 22:48:00 [只看该作者]


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

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/1/25 22:55:00 [只看该作者]

自己加个判断,如果n为空值,就不用卸载

 回到顶部
总数 13 1 2 下一页