以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  保存时修改字符  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=138030)

--  作者:yifan3429
--  发布时间:2019/7/21 12:52:00
--  保存时修改字符
今日达成,明日计划,营业收入,今日支出

nr("目录树") = e.Form.Controls("CheckedComboBox数据列").Text

nr("排序值") = e.Form.Controls("CheckedComboBox数据列").Text   保存时 讲逗号 换成 |

今日达成|明日计划|营业收入|今日支出
图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_20190721124938.png
图片点击可在新窗口打开查看

--  作者:y2287958
--  发布时间:2019/7/21 16:10:00
--  
Replace
--  作者:有点蓝
--  发布时间:2019/7/21 21:12:00
--  
nr("排序值") = e.Form.Controls("CheckedComboBox数据列").Text.replace(",","|")


--  作者:yifan3429
--  发布时间:2019/7/21 23:02:00
--  
今日达成,明日计划,营业收入,今日支出
今日达成第一个逗号前加入排序,明日计划,营业收入,今日支出

怎么处理呢 

--  作者:有点蓝
--  发布时间:2019/7/21 23:08:00
--  
没看懂,截图说明一下
--  作者:yifan3429
--  发布时间:2019/7/22 9:54:00
--  
后面这种
图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_20190722095335.png
图片点击可在新窗口打开查看
加上 DESC
[此贴子已经被作者于2019/7/22 9:54:19编辑过]

--  作者:有点蓝
--  发布时间:2019/7/22 10:04:00
--  
参考:http://www.foxtable.com/webhelp/topics/1338.htm

Dim s As String = "今日达成,明日计划,营业收入,今日支出"
Dim i As Integer = s.IndexOf(",")
If i = -1 Then
    s = s & " desc"
Else
    s = s.Insert(i ," desc")
End If
Output.Show(s)