设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1555|回复: 5
打印 上一主题 下一主题

[模块/函数] 请大家看看关于字符串取值的问题:

[复制链接]
跳转到指定楼层
1#
发表于 2016-5-16 15:49:42 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
请大家看看关于字符串取值的问题:
我研究半天老汉师傅的正则取值,还是不会,因此请大家看看:
将表tbltemp_PARKER的Parker_barcode字段值以“-”的分隔符进行分配到表tblPO_Temp的字段里,如何批量进行拆分,谢谢
Parker_barcode
PO160598-001-002-003047-01/2016
PO160598-001-002-124465-01/2016

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2016-5-16 15:55:04 | 只看该作者
正则表达式有点高深,你也可以一个字符一个字符的去比较,然后写到新表里

点击这里给我发消息

3#
发表于 2016-5-16 15:58:04 | 只看该作者
以“-”分割,那可以用split函数
4#
发表于 2016-5-16 16:16:11 | 只看该作者
两步骤
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;
5#
 楼主| 发表于 2016-5-16 16:18:27 | 只看该作者
夜归人 发表于 2016-5-16 16:16
两步骤
1.按ALT+F11,进入VBA编辑,菜单 插入\模块
复制下段代码到右边空白处

谢谢帮助,
6#
发表于 2016-5-16 16:20:05 | 只看该作者
不明白可联系我
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-20 13:41 , Processed in 0.171372 second(s), 30 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表