Access培训
网站公告
·Access专家课堂QQ群号:239158550    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-查询/SQL语句

利用split函数批量整理数据

时 间:2021-02-21 10:30:31
作 者:某.强人   ID:73257  城市:长沙
摘 要:利用split函数批量批量拆分字符。
正 文:

一、学友问题描述:

      各位:坛友,高手,老师大家新年好,刚开工就碰到了难题,请各位帮帮忙,感谢!

      零件位置中尖括号与圆括号之前为代用料号 < 0343103132 (,括号中蓝色部部份为代用规格,数据整理后,将代用料号与规格提取出来,并填充相同的用量与位置。

点击图片查看大图


二、解决方案:

      利用split函数个字段的起始位置,与字段长度,然后使用mid函数取值。如下图:

点击图片查看大图


利用查询生成SQL代码,在窗体中执行。代码如下:

      Private Sub Command0_Click()
         Dim strsql As String
         strsql = "Select Mid([零件位置],InStr([零件位置],'<')+1,(InStr([零件位置],'(')-1)-(InStr([零件位置],'<'))) " _
         & "AS 料号, Mid([零件位置],InStr([零件位置],'(')+1,(InStr([零件位置],')')-1)-(InStr([零件位置],'('))) " _
         & "AS 规格, 整理前.用量, Mid([零件位置],1,InStr([零件位置],'<')-2) " _
         & "AS 整理后零件位置 INTO 整理后 " _
         & "FROM 整理前 " _
         & "Where (((InStr([零件位置],'<'))>0))"
         DoCmd.RunSQL strsql
      End Sub

图   示:

点击图片查看大图


供参考文章:

利用instr和Mid函数定位提取字符串



Access软件网官方交流QQ群 (群号:39785885)       Access源码网店

最新评论: 查看更多评论(1)

2021/2/21 14:23:22风的承诺
非常好,感谢

发表评论:您的评论将提升作者分享的动力!快来评论点评一下您的观点吧!

用户名:
密 码:
内 容:
 

常见问答:

技术分类:

相关资源:

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助