以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]截取关键字,带出其他信息  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=144260)

--  作者:East12
--  发布时间:2019/12/15 16:28:00
--  [求助]截取关键字,带出其他信息
输入一个条码,里面有关键字,需要把这个关键字提取出来写入到另外一个单元格中,然后通过这个关键字查找其他信息,其他信息填入到另外的单元格。完全没有头绪怎么做?
比如条码为:021301AAAB2B01,关键字为“AAAB2”,关键字长度有好几种(多一位、两位或者空格等),AAAB2对应的其他信息为“500电器”。

--  作者:y2287958
--  发布时间:2019/12/15 19:18:00
--  
这个得有规律才行
--  作者:有点蓝
--  发布时间:2019/12/15 20:35:00
--  
怎么判断条码里有没有所谓的“关键字”?
--  作者:East12
--  发布时间:2019/12/16 16:08:00
--  
条码里面肯定有,因为条码的编码规范里面就要求必须有这个关键字
--  作者:有点蓝
--  发布时间:2019/12/16 16:27:00
--  
我知道有,那么怎么判断里面哪些字符是关键字?根据什么规则取关键字?
--  作者:East12
--  发布时间:2019/12/22 21:17:00
--  
根据总长度可以确定,比如我们的一个条码规则是这样的,021602000051CC26BN21A01,这个条码总长度是23位,其中CC26BN21就是型号;021602000051CT500N20BGA01,总长度是25位,其中CT500N20BG就是型号。现在总长度就是这个2个规则。要能够根据条码的长度自行判断型号。
--  作者:有点蓝
--  发布时间:2019/12/22 22:15:00
--  
Dim s As String = "021602000051CT500N20BGA01"
msgbox(s.SubString(12,s.Length - 15))