reading a string

[fasi]

Well . I want to read a string character by character . starting from the end ... I did it before .but now i completely forgot how to do it .. can someone post a code that reads a string each character at at time .. and then we cna decrement the pointer to read the preceeding character ..


Tahnx

[sebs]

for x = len(yourWord) to 0
msgbox mid(yourWord,x,1)
next x


i'm not sure, but it will problably work,

it's been long since i did some vb!!

with what reeset just say,

if my code does not work, this will

for x = 0 to len(yourWord)
msgbox mid(strReverse(yourWord),x,1)
next x

[reeset]

If you are just working with a string, use the strReverse command. This will reverse the string, and allow you to read it from beginning to end.

Private Sub Command1_Click()
Dim test_string As String
 
test_string = "Hello World"
test_string = StrReverse(test_string)
MsgBox test_string
 
End Sub

Hope this helps.

[Merlin]

Private Sub Form_Load()
    
    Dim lIndex As Long
    Dim sStringToReadIn As String
    
    sStringToReadIn = "Hello World"
    
    For lIndex = Len(sStringToReadIn) To 1 Step -1
        
        If lIndex = 0 Then
            Exit For
        End If
        
        Text1 = Text1 & Mid$(sStringToReadIn, lIndex, 1) & " - " & lIndex & vbCrLf
    
    Next
    
End Sub