pake split aja, ex :
   
  Private Sub Command1_Click()
    Dim i As Integer
    
    Dim str As String
    Dim myarray() As String
    
    str = "TES DOANK"
    
    myarray = Split(str, " ")
    List1.Clear
    For i = LBound(myarray) To UBound(myarray)
        If Trim$(myarray(i)) <> "" Then List1.AddItem myarray(i)
    Next
End Sub

bambang supriadi <[EMAIL PROTECTED]> wrote:
          Mohon bantuan gimana cara ngambil string perkarakter, misalnya

TES DOANG

saya ingin ngambil kata TES lalu DOANG secara terpisah, tapi spasi pada string 
diatas tidak mempengaruhi apakah satu spasi atw dua spasi dst, misalnya

TES DOANG

---------------------------------
Ahhh...imagining that irresistible "new car" smell?
Check outnew cars at Yahoo! Autos.

[Non-text portions of this message have been removed]



         

 
---------------------------------
Be a PS3 game guru.
Get your game face on with the latest PS3 news and previews at Yahoo! Games.

[Non-text portions of this message have been removed]

Kirim email ke