vb.net分割字符串 vba 分割文本

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

基本上不出错了

相关问答

Q1: VB.NET怎样拆分字符串

输入vb.net分割字符串的字符串为svb.net分割字符串，然后

r=Split(Replace(s,"#","@"),"@")

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

原字符串里：00.0 R-1 SW_STOP 6-9 之间是不是有空格？

如果是的话

Dim STR1, STR2() As String

Dim arr1 As New ArrayList

STR1 = ":00.00 R-1 Sw_STOP 6-9" '你原来的字符串

STR2 = STR1.Split(" ") ‘按空格符截取

Dim i As Integer

For i = 0 To STR2.Length - 1 Step 1

If STR2(i) "" Then

arr1.Add(STR2(i))

End If

Next

最后得到的 arr1 就是分割后的字符串集合

如果原字符串没有空格，并且字符串长度固定，截取出来的部分也固定

那么就用 substring函数 一个一个的截取也就试了

如果原字符串长度也不固定，那么要根据你的截取规则来做。如果上述两个答案不能解决的话还需要更详细的问题

关于vb.net分割字符串和vba 分割文本的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。