以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 系统这个功能,代码怎么写? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=109068) |
-- 作者:liyanfeng -- 发布时间:2017/11/3 15:28:00 -- 系统这个功能,代码怎么写? 系统(选择列)这个功能,代码怎么写的 此主题相关图片如下:67f71248574bf9154746c8f3b4e4061.png ? 勾选会在后面添加字段名|列宽,取消勾选又会删除///?????????
|
-- 作者:有点蓝 -- 发布时间: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)
|
-- 作者:有点甜 -- 发布时间:2017/11/3 17:04:00 -- 参考
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=108436&skin=0
|
-- 作者:liyanfeng -- 发布时间:2017/11/3 17:54:00 -- 懂了,谢谢..... |
-- 作者:liyanfeng -- 发布时间:2017/11/3 17:55:00 -- 懂了,谢谢。。。 |