Member Avatar for baabjitvk

hi i'm new to vb. how can i write to iterate while loop till the end of the string.. can any one help please...

  • 4 Contributors
  • 6 Replies
  • 199 Views
  • 14 Hours Discussion Span
  • Latest Post Latest Post by rishif2
Member Avatar for Pilot122x

Please explain in more detail what you want to do because I really don't understand what your saying

Member Avatar for Klahr_R

If you are reading the characters in a string then

    Dim aChr as String
    Dim X as Integer

    For X = 1 to len(MyString)
            aChr = mid$(MyString,1 ,1)
            'do code
    Next X

If you are reading from a file that will be different.

Member Avatar for baabjitvk

len function is not working...
its considering it as an array...

thank you......

Member Avatar for Klahr_R

make it
mid$(achr, X, 1)
that should work better

Edited by Klahr_R
Member Avatar for baabjitvk

sir problem is not with mid$
but with len(string)

when i write like that, it shows an error that len not delared

Member Avatar for rishif2

@Klahr_R
Never Forget to increment the value of X. in you case it will always return the same character because start position is not incremented. so don't forget to put X=X+1 after mid$(achr, X, 1)

@baabjitvk
try this

Dim str As String
Dim i As Integer
i = 1
str = "String"
While i <= Len(str)
MsgBox Mid(str, i, 1)
i = i + 1
Wend

hope this helps you . . .

Edited by rishif2
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.