VB中的字符串问题

Question

VB中有把一个字符串拆分成几个子串的函数吗?
比如有一个字符串"aaabbbccc"
我想把上面的字符串拆分成三个子串,分别为aaa,bbb,ccc
怎样拆分
谢谢!!

Answer 1

拆分可以用Split函数，但要求字符串有规律，必须按一个标识来分。
但你这个不能这么拆分。用Left,right,mid来做要好点。
s ="aaabbbccc"
s1 = left(s,3)
s2=mid(s,4,3)
s3=right(s,3)

Answer 2

如果字符串是"aaa bbb ccc"怎样拆分???

Answer 3

'假如aaabbbccc有分割符,例如" "空格,可以用Split
Private Sub Command1_Click()
    Dim strTemp As String
    Dim strArr() As String
    strTemp = "aaa bbb ccc" 
    
    strArr = Split(strTemp, " ")
    
    Dim i As Integer
    For i = 0 To UBound(strArr)
        Debug.Print strArr(i)
    Next
End Sub假如没有分割符,遍历字符串,找到相同的就拼成一个子字符串!