主题：按标点符号分割字符串

老师，我有一些字符串内容，我想对这些字符串内容进行比较，它们又不是严格一致，我想把这些字串按标点符号，拆分成一个个的小的字符数组

 

比如这个字符串：“经济学类(含荷兰格罗宁根大学双学位项目)(含国家公派留学计划及德国哥廷根大学、慕尼黑大学、法国巴黎政治大学等校免学费交流项目；含经济学、国际经济与贸易(国际经济学方向)、金融学、财政学，保险学5个专业；部分专业课程英语授课)”

 

 

我想要的目标是，只要遇到标点符号就断开，折成一个个的字符串数组，字符串数组不包括标点符号，如下面

 

经济学类

含荷兰格罗宁根大学双学位项目

含国家公派留学计划及德国哥廷根大学

慕尼黑大学

。。。。。等等

 

我感觉是不是要用正则呢，没有啥思路，拜托老师了

参考代码

 

'''
Dim str As String = "经济学类(含荷兰格罗宁根大学双学位项目)(含国家公派留学计划及德国哥廷根大学、慕尼黑大学、法国巴黎政治大学等校免学费交流项目；含经济学、国际经济与贸易(国际经济学方向)、金融学、财政学，保险学5个专业；部分专业课程英语授课)"
Dim ary = str.split(new Char(){"(", ")", "、", "；"})
For Each s As String In ary
    msgbox(s)
Next