- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]字段拆分 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=100619)
-- 发布时间：2017/5/15 12:43:00
-- [求助]字段拆分
老师好，我想把辅助列三进行拆分分别赋值给“区域代码”，“分类码”，“名称”列中。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:字段拆分.table |
-- 发布时间：2017/5/15 14:38:00
--
Dim r As Row = Tables("表A").Current
Dim arr() As String = r("辅助列三").split(" ")
If arr.Length = 3 Then
r("区域代码") = arr(0)
r("分类码") = arr(1)
r("名称") = arr(2)
End If
-- 发布时间：2017/5/15 16:53:00
--
谢谢老师！