weixin_40187983 2019-07-05 07:29 采纳率: 100%
浏览 188
已采纳

vb.net 字串的切割问题 进阶

原始字串
"'AA试用装(福利商品)','BB纸尿裤旅行装(纸尿裤旅行装)','果C成长裤试用装(纸尿裤系列试用装)'".........很长

希望字串

(系列='福利商品' and 商品名='AA试用装') or
(系列='纸尿裤旅行装' and 商品名='BB纸尿裤旅行装')or
(系列='纸尿裤系列试用装' and 商品名='果C成长裤试用装')or...

备注:
'AA试用装(福利商品)'
前面为【商品名】,后面为【系列】
里面字串会有英文字

  • 写回答

1条回答 默认 最新

  • threenewbee 2019-07-05 09:49
    关注
    Imports System.Text.RegularExpressions
    
    Module Module1
    
        Sub Main()
            Dim s As String = "'AA试用装(福利商品)','BB纸尿裤旅行装(纸尿裤旅行装)','果C成长裤试用装(纸尿裤系列试用装)'"
            Dim query = s.Split(",").Select(Function(x) Regex.Match(x, "\'([^\(]+)\(([^\)]+)\)\'")) _
                .Select(Function(m) String.Format("(系列='{1}' and 商品名='{0}')", m.Groups(1).Value, m.Groups(2).Value))
            Dim result = String.Join(" or " & vbCrLf, query)
            Console.WriteLine(result)
        End Sub
    
    End Module
    
    

    (系列='福利商品' and 商品名='AA试用装') or
    (系列='纸尿裤旅行装' and 商品名='BB纸尿裤旅行装') or
    (系列='纸尿裤系列试用装' and 商品名='果C成长裤试用装')
    Press any key to continue . . .

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论

报告相同问题?

悬赏问题

  • ¥15 NAO机器人的录音程序保存问题
  • ¥15 C#读写EXCEL文件,不同编译
  • ¥15 MapReduce结果输出到HBase,一直连接不上MySQL
  • ¥15 扩散模型sd.webui使用时报错“Nonetype”
  • ¥15 stm32流水灯+呼吸灯+外部中断按键
  • ¥15 将二维数组,按照假设的规定,如0/1/0 == "4",把对应列位置写成一个字符并打印输出该字符
  • ¥15 NX MCD仿真与博途通讯不了啥情况
  • ¥15 win11家庭中文版安装docker遇到Hyper-V启用失败解决办法整理
  • ¥15 gradio的web端页面格式不对的问题
  • ¥15 求大家看看Nonce如何配置