Left() and Right()

[JesseW]

Being a seasoned veteran to the Basic programming lang, but a noob to B4P, I was saddened to see the string manipulation functions Left() and Right() omitted from b4p. I know I can use subString() but it's just not the same, and it causes me to have to divert my train of thought from what I'm working on to coding something that's been in basic for 20+ years. Pleeze...

[klaus]

There exist a library with VB like functions here.
http://www.basic4ppc.com/forum/itali...html#post16101
written by maxim in the Italian Forum.

Best regards.

[agraham]

There's also my StringsEx library which has some VB like functions as well as exposing most of the .NET string methods. http://www.basic4ppc.com/forum/addit...library.htmlIt also includes Stringbuilder for efficiently building and manupulating strings.

[JesseW]

thanx guys. i'm going to like it here

[Erel]

OOPS. This post should have been here: http://www.basic4ppc.com/forum/basic...html#post17568

[digitaldon37]

I used to keep my "VB" string functions in a text file and add them with the "Tools->Components->Add Code" menu option but when agraham released his string library I switched to that.

' These functions saved to file "strings.txt"

Sub Left (str, n)
    Return SubString(str,0,n)
End Sub

Sub Right (str,n)
    Return SubString(str, StrLength(str)-n,n)
End Sub

Sub Mid (str,x,n)
    Return SubString(str,x-1,n)
End Sub

Sub Ltrim (str)

    Do
    x=x+1
    Loop While StrAt(str,x)=" "
    Return SubString(str,x, StrLength(str)-x)
    
End Sub

Sub Rtrim (str)
    x=StrLength(str)
    
    Do
    x=x-1
    Loop While StrAt(str,x)=" "
    Return SubString(str,0, x+1)
    
End Sub

Sub Len (str)
    Return StrLength(str)
End Sub

Sub Reverse (str)
    x=StrLength(str)+1

    Do
        newstr=newstr & SubString(str,x-1,1)
        x=x-1
    Loop While x > 0
    Return newstr
End Sub

[JesseW]

Thanks everyone for the handy tips....