Foxtable(狐表)用户栏目专家坐堂 → [求助]关键字识别批量导入


  共有2478人关注过本帖树形打印复制链接

主题:[求助]关键字识别批量导入

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/7/25 11:51:00 [显示全部帖子]

Dim str As String = "VOLCOMSTYLE: G1351809COLOR: CAMSIZE: XLARGEROAN BIB OVERALL89623764052"
str = str.replace("STYLE: ", "@").replace("COLOR: ", "@").replace("SIZE: ", "@")
Dim ary() = str.split("@")
msgbox(ary(0))
msgbox(ary(1))
msgbox(ary(2))

 回到顶部