Foxtable(狐表) → 用户栏目 → 专家坐堂 → 有没有办法直接得到“1”，“2”，……类似的值呢？


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

主题：有没有办法直接得到“1”，“2”，……类似的值呢？
帅哥哟，离线，有人找我吗？
cnsjroom
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1571 积分：11238 威望：0 精华：0 注册：2021/1/17 17:06:00 		有没有办法直接得到“1”，“2”，……类似的值呢？  发帖心情 Post By：2023/3/6 10:15:00 [显示全部帖子]

Dim lst As List(Of String)
lst = Connections("12+3").GetTableNames 
output.show(& String.join(",",lst.toarray))
得到的是1，2，3，4，5
有没有办法直接得到“1”，“2”，……
 回到顶部
帅哥哟，离线，有人找我吗？
cnsjroom
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1571 积分：11238 威望：0 精华：0 注册：2021/1/17 17:06:00 		回复：（有点蓝）output.show(& String.join(""",...  发帖心情 Post By：2023/3/6 10:49:00 [显示全部帖子]

再麻烦老师一下 如果我要排除部分表 怎么操作呢
Dim lst As List(Of String)
lst = Connections("12+3").GetTableNames
For Each nm As String In lst
    
    If nm.Contains("CW")  Then
    Else If nm.Contains("SYS")  Then
    Else If nm.Contains("YW")  Then
    Else
        String.join(""",""",lst.toarray) 
    End If
Next
output.show(String.join(""",""",lst.toarray))

当前代码运行得到的是全部表名  我想排除CW  SYS  YW开头的表


output.show("{" & String.join(""",""",lst.toarray) & "}")
得到的是{1”，“2”，……,"N}没有红色部分的{“1”，“2”，……,"N"}“符号   怎么补正呢？
当前代码如下：
Dim cols As String() = "{'"& String.join(""",""",lst.toarray) &"'}"
[此贴子已经被作者于2023/3/6 10:55:30编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
cnsjroom
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1571 积分：11238 威望：0 精华：0 注册：2021/1/17 17:06:00 		回复：（有点蓝）Dim cols As String() = "{""" &...  发帖心情 Post By：2023/3/6 23:10:00 [显示全部帖子]

---------------------------
错误
---------------------------
编译错误:类型“String”的值无法转换为“String 的 1 维数组”。
错误代码：Dim cols As String() = "{""" & String.join(""",""",lst.toarray) & """}"
---------------------------
确定   
---------------------------

怎么修正呢？

当前代码如下：
Dim lst As List(Of String)
lst = Connections("12+3").GetTableNames
For Each nm As String In lst
    If nm.Contains("CW")  Then
    Else If nm.Contains("SYS")  Then
    Else If nm.Contains("YW")  Then
    Else
        output.show( "{""" & String.join(""",""",lst.toarray) & """}")   想实现不含cw sys yw 的表名  组成{“1”，“2”}  这个部分代码怎么写呢？
    End If
Next
Dim cols As String() = "{""" & String.join(""",""",lst.toarray) & """}"
 回到顶部
帅哥哟，离线，有人找我吗？
cnsjroom
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1571 积分：11238 威望：0 精华：0 注册：2021/1/17 17:06:00 		回复：（有点蓝）Dim cols As String = "{""" & S...  发帖心情 Post By：2023/3/7 19:49:00 [显示全部帖子]

Dim lst As List(Of String)
lst = Connections("12+3").GetTableNames
For Each nm As String In lst
    If nm.Contains("CW")  Then
    Else If nm.Contains("SYS")  Then
    Else If nm.Contains("YW")  Then
    Else
        Dim cols As String = "{""" & String.join(""",""",lst.toarray) & """}"
    End If
Next
output.show(cols)
老师 红色部分输出还是包含的有cw sys  yw的  怎么排除这三个呢
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 5 次数据查询