strings no vb6

[danielprince]

Eu tenho uma string no vb. do tipo aabbabababababaaababbba. queria um código SIMPLES(o mais simples possível) para que todos os a's no começo da string fossem eliminados, deixando o resto. por exemplo, abbab viraria bbab.

-------edit-------

acho que resolvi o problema.

minhastring = "b" + Split(minhastring, "b", 2)(1)

mas agora me surgiu uma outra duvida

como separar todas as letras, sem nenhum divisor. por exemplo, separar "bbaabab" em "b", "b", "a", "a", "b", "a", e "b"?

Editado Julho 31, 2010 por quintelab
Removido Dúvida do título

[kuroi]

no .net as strings tem o metodo ToCharArray() q resolveria isso pra você.

no vb6, você teria q pegar cada caracter usando o Mid().

ou você pode declarar uma funcao ToCharArray() q copie toda a string pra um array. assim:

Public Sub ToCharArray(ByRef x As String, ByRef a() As String)
    If x = "" Then Exit Sub

    ReDim a(Len(x) - 1)
    
    Dim i As Integer
    
    For i = 0 To Len(x) - 1
        a(i) = Mid(x, i + 1, 1)
    Next
End Sub[/code]



ai você simplesmente acessa assim:
[code]Dim minhastring As String, meuarray() As String

minhastring = "aabbabababababaaababbba"

ToCharArray minhastring, meuarray

MsgBox meuarray(0) 'a
MsgBox meuarray(1) 'a
MsgBox meuarray(2) 'b
MsgBox meuarray(3) 'b
MsgBox meuarray(4) 'a
...
...

Editado Agosto 1, 2010 por kuroi