Office中国论坛/Access中国论坛

标题: 请大家看看关于字符串取值的问题： [打印本页]

作者: yanwei82123300 时间: 2016-5-16 15:49
标题: 请大家看看关于字符串取值的问题：
请大家看看关于字符串取值的问题：
我研究半天老汉师傅的正则取值，还是不会，因此请大家看看：
将表tbltemp_PARKER的Parker_barcode字段值以“-”的分隔符进行分配到表tblPO_Temp的字段里，如何批量进行拆分，谢谢
Parker_barcode
PO160598-001-002-003047-01/2016
PO160598-001-002-124465-01/2016

作者: changxing 时间: 2016-5-16 15:55
正则表达式有点高深,你也可以一个字符一个字符的去比较,然后写到新表里

作者: 盗梦 时间: 2016-5-16 15:58
以“-”分割，那可以用split函数

作者: 夜归人 时间: 2016-5-16 16:16
两步骤
1.按ALT+F11，进入VBA编辑，菜单插入\模块
复制下段代码到右边空白处

Function GetString(T As String, I As Integer) As String
GetString = Split(T, "-")(I - 1)
End Function

2、再按ALT+F11回到 ACCESS 新建一个查询，切换到SQL模式，所下段SQL粘贴进去，保存，执行一次就行了
记住，只能执行一次

INSERT INTO tblPO_Temp ( PO, PO_LINE, QTY, CUSTPN, CURE_DATE )
SELECT getstring(a.t,1) , getstring([a].[t],2) , getstring([a].[t],3), getstring([a].[t],4) , cdate("01/" & getstring([a].[t],5))
FROM (SELECT tbltemp_PARKER.Parker_barcode AS T
FROM tbltemp_PARKER) AS a;

作者: yanwei82123300 时间: 2016-5-16 16:18

夜归人发表于 2016-5-16 16:16
两步骤
1.按ALT+F11，进入VBA编辑，菜单插入\模块
复制下段代码到右边空白处

谢谢帮助，

作者: 夜归人 时间: 2016-5-16 16:20
不明白可联系我

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)