【Access源码示例】分隔数据简化处理；一个字段中的字符串，想把第二个“/”后面的字符删掉，变成 "等" 显示简化数据的结果

时　间:2023-01-10 09:38:43
作　者:金宇   ID：43  城市：江阴
摘　要:分隔数据简化处理。
正　文:

一、学员问题描述：
VIP金卡:青岛--洁瑞纺织-146期  15:49:04
请教一下老师，下面这些是一个字段中的字符串，想把第二个“/”后面的字符删掉，变成 "等" 显示，数据格式如下：

7518546/7518548/7518549/7518551/7518553/7518555/7518054
7522977/7524421
7522981/7524422
7522962/7522965/7522966
7522969/7522971/7522972

这些数字是个字符串，长短不一。如果一个数据的，就没这个斜杠了。斜杠是我合并字符时加上的。合并完，又太长了，需要删掉一些，如下图：

期望的结果如下图：

二、解决方法1，未实测，代码如下：

     If InStr(Rsdes("ArticleNO"), "/") = 0 Then                    
                    Rsdes("ArticleNO") = Rsdes("ArticleNO") & "/" & Rs("ArticleNO")
                Else
                    If InStr(Rsdes("ArticleNO"), "等") = 0 Then                        
                        Rsdes("ArticleNO") = Rsdes("ArticleNO") & "等"
                    Else                        
                        Rsdes("ArticleNO") = Rsdes("ArticleNO")
                    End If
                End If

解决方法2：

通过记录集的循环处理就可以实现，整理成了示例文档，请下载参考。

附   件:

点击下载此附件

演   示: