vb.net多字符串分割 vb 字符串处理

求vb.net大神,将字符串分割，急！！！！

让我来告诉你答案!利用myword=.Split(separator),可以把字符串在指定的位置分开，这个位置有separator这个数组的形式决定，可以设定为空格字符就OK了！

成都创新互联是一家集网站建设,永善企业网站建设,永善品牌网站建设,网站定制,永善网站建设报价,网络营销,网络优化,永善网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。

VB.net 字符串分割的问题

‘第一种

Dim a As String = IO.Path.GetDirectoryName("D:\项目\0913 \test.text")  "\"  IO.Path.GetFileNameWithoutExtension("D:\项目\0913 \test.text")

’第二种

Dim a1() As String = Split("D:\项目\0913 \test.text", ".") '以.分割内容

'a1(0)为需要获取的字符串，路径中不能存在两个点或以上

‘第三种

Dim a2 As String = "D:\项目\0913 \test.text"

a2 = a2.Substring(0, a2.Length - 5) '扩展名长度固定，路径中可以存在多个点

' a2 = a2.Substring(0, InStr(a2, ".") - 1) '不知扩展名的长度，路径中不能存在多个点

’如果必要，建议用第一种，不受任何限制

vb.net 分割字符串

Function a(s As String) As String

Dim i = s.IndexOf("/")

If i 0 Then

Return s.Substring(0, i)

ElseIf i = 0 Then '第一个字符为"/"

If s.LastIndexOf("/") 0 Then '不只一个"/"

Return s.Substring(0, s.Substring(1).IndexOf("/") + 1)

Else

Return Nothing '只有一个"/"

End If

Else '不含"/"或是空串

Return Nothing

End If

End Function

基本上不出错了