Strings in VB - Part I

Discussion in 'Visual Basic [VB]' started by pradeep, Nov 29, 2006.

  1. pradeep

    pradeep Team Leader

    Joined:
    Apr 4, 2005
    Messages:
    1,645
    Likes Received:
    87
    Trophy Points:
    0
    Occupation:
    Programmer
    Location:
    Kolkata, India
    Home Page:
    http://blog.pradeep.net.in

    Substrings



    Left, Right and Mid are three Visual Basic functions to locate sections of a string. All of the following examples use the string "strExample" with the following value.

    strExample = "Please try to substring this"

    The Left function returns the requested number of characters from the left side of the string.

    Code:
    Me.Print Left(strExample, 10)
    Returns, "Please try"

    The Right function returns the requested number of characters from the right side of the string.

    Code:
    Me.Print Right(strExample, 18)
    Returns, "do what you can do"

    The Mid function returns the middle of a string. It takes three parameters, the string, the starting position and the length of the string to be returned.

    Code:
    Me.Print Mid(strExample, 8, 6)
    Returns, "try to"

    The Len function is used to determine the length of a string. The next example uses the Len and the Mid function to print a string of text down the form.
    Code:
    Dim counter As Integer 
    
    Const strExample As String = "Please try to do what you can do"
     
    For counter = 1 To Len(strExample) 
    	Me.Print Mid(strExample, counter, 1) 
    Next counter
    

    String Concatenation



    Strings are joined together using the & operator.
    Code:
     
    Dim strFirst As String, strSecond As String, strResult As String 
    strFirst = "Too "
    strSecond = "bad!" 
    strResult = strFirst & strSecond 
    Me.Print strResult
    The concatenation operator is useful for building up long strings a bit at a time.
    Code:
     
    Dim strSQL As String 
    
    strSQL = "SELECT Surname, TelNo " & _ 
    "FROM Customer " & _
    "ORDER BY Surname"
     

    Searching a String



    InStr and InStrRev are two Visual Basic functions to locate one string inside another. InStr locates the first occurrence of the string, and InStrRev locates the last occurrence.

    Code:
     
    Const strExample As String = "Please try to do what you can do" 
    Dim pos As Integer 
    pos = InStr(strExample, "do") 
    If pos > 0 Then 
    	Me.Print "Found first occurrence of string at position " & pos
    Else 
    	Me.Print "String not found" 
    End If
    Returns, "Found first occurrence of string at position 15"
    Code:
    Const strExample As String = "Please try to do what you can do" 
    Dim pos As Integer 
    pos = InStrRev(strExample, "do") 
    If pos > 0 Then 
    	Me.Print "Found last occurrence of string at position " & pos
    Else 
    	Me.Print "String not found" 
    End If
    Returns, "Found last occurrence of string at position 31"
     
  2. Steel9561

    Steel9561 New Member

    Joined:
    Apr 26, 2008
    Messages:
    14
    Likes Received:
    1
    Trophy Points:
    0
    I think that the Mid function is often used whenever you need to extract a certain string from a big string. I often do it in the programs I do. You extract only what you want and then you work with that string or display it to the user in a listbox, combo box, etc..

    Luis Lazo
     
    Last edited by a moderator: May 1, 2008
  3. articlechamp

    articlechamp New Member

    Joined:
    Apr 21, 2009
    Messages:
    1
    Likes Received:
    0
    Trophy Points:
    0
    thnks its wnderful :)
     

Share This Page

  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice