- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]多值列根据\符号拆分 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=105755)
-- 发布时间：2017/8/25 14:24:00
-- [求助]多值列根据\符号拆分
想实现全路径列根据\\符号拆分填入多列： 拆1、拆2、拆3。。。列
此主题相关图片如下：效果.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:符号拆分填写多列.foxdb |
-- 发布时间：2017/8/25 15:37:00
--
If e.DataCol.name = "全路径" Then
For i As Integer = 1 To 9
e.DataRow("拆" & i) = Nothing
Next
If e.NewValue > "" Then
Dim ary() As String = e.NewValue.split("\\")
For i As Integer = 1 To ary.length
e.DataRow("拆" & i) = ary(i-1)
Next
End If
End If
-- 发布时间：2017/8/25 16:32:00
--
可以了，非常感谢