Foxtable(狐表)用户栏目专家坐堂 → 系统这个功能,代码怎么写?


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

主题:系统这个功能,代码怎么写?

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


加好友 发短信
等级:婴狐 帖子:43 积分:487 威望:0 精华:0 注册:2013/9/27 9:06:00
系统这个功能,代码怎么写?  发帖心情 Post By:2017/11/3 15:28:00 [只看该作者]

系统(选择列)这个功能,代码怎么写的
图片点击可在新窗口打开查看此主题相关图片如下:67f71248574bf9154746c8f3b4e4061.png
图片点击可在新窗口打开查看
勾选会在后面添加字段名|列宽,取消勾选又会删除///?????????

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


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/11/3 16:56:00 [只看该作者]

Dim str As String = "字段名1|80|字段名2|90|字段名3|100"
Dim cn As String = "字段名3"
Dim idx As Integer = str.IndexOf(cn)
If idx > -1 Then
    Dim str2 As String = str.SubString(idx + cn.Length + 1)
    Dim idx2 As Integer = str2.IndexOf("|")
    If idx2 > -1 Then
        cn = cn & "|" & str2.SubString(0,idx2+1)
    Else
        cn = str.SubString(IIF(idx = 0,idx,idx-1))
    End If
    Output.Show(cn)
End If
str = str.Replace(cn,"")
Output.Show(str)

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/11/3 17:04:00 [只看该作者]


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


加好友 发短信
等级:婴狐 帖子:43 积分:487 威望:0 精华:0 注册:2013/9/27 9:06:00
  发帖心情 Post By:2017/11/3 17:54:00 [只看该作者]

懂了,谢谢.....

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


加好友 发短信
等级:婴狐 帖子:43 积分:487 威望:0 精华:0 注册:2013/9/27 9:06:00
  发帖心情 Post By:2017/11/3 17:55:00 [只看该作者]

懂了,谢谢。。。

 回到顶部