ในส่วนนี้จะมาดูคำสั่ง และฟังก์ชันในการจัดการกับข้อความ String Manipulation

1. การหาควาายาวของ String และ ข้อความที่อยู่ใน TextBox ด้วยฟังก์ชัน Len()
2. การค้นหา สตริงที่อยู่ใน สตริง ฟังก์ชัน InStr()
3. การตัดคำ หรือ ตัดข้อความ Mid()

    
ต.ย. การหาความยาวของ ข้อความ ด้วย ฟังก์ชัน Len()
      Dim StrLen as Int16
        Dim Str1 as String = "Hello Visual Basic .NET 2005"
        StrLen = Len(Str1)
        MsgBox ("StrLen" )

ผลลัพธ์ที่ได้ ::

------------------------------------------------------------------------------------------
ต.ย. การหาความยาวของ ข้อความ จาก Textbox ด้วย Method Lenght()
      Dim StrLen as Int16
       TextBox1.Text =" Hello Visual Basic .NET 2005"
        StrLen = Textbox1.Text.Lenght
        MsgBox ("ใน TextBox1 มี จำนวนตัวอักษร : " & StrLen & " ตัวอักษร")

ผลลัพธ์ที่ได้ ::
------------------------------------------------------------------------------------------

ต.ย. การหาความยาวของ ข้อความ จาก Textbox ด้วย Method TextLenght()
      Dim StrLen as Int16
       TextBox1.Text =" Hello Visual Basic .NET 2005"
        StrLen = Textbox1.TextLenght
        MsgBox ("ใน TextBox1 มี จำนวนตัวอักษร : " & StrLen & " ตัวอักษร")

ผลลัพธ์ที่ได้ ::
------------------------------------------------------------------------------------------

ต.ย. การหาความยาวของ ข้อความ จาก Textbox ด้วย Method Lenght()
      Dim StrLen as Int16
       TextBox1.Text =" Hello Visual Basic .NET 2005"
        StrLen = Textbox1.Text.Lenght
        MsgBox ("ใน TextBox1 มี จำนวนตัวอักษร : " & StrLen & " ตัวอักษร")

ผลลัพธ์ที่ได้ ::
------------------------------------------------------------------------------------------

ต.ย. การหาความยาวของ ข้อความ จาก Textbox ด้วย Method Lenght()
      Dim StrLen as Int16
       TextBox1.Text =" Hello Visual Basic .NET 2005"
        StrLen = Textbox1.Text.Lenght
        MsgBox ("ใน TextBox1 มี จำนวนตัวอักษร : " & StrLen & " ตัวอักษร")

ผลลัพธ์ที่ได้ ::
------------------------------------------------------------------------------------------

ต.ย. การใช้งานฟังก์ชัน MID()
      Dim Str1 as String
       TextBox1.Text =" Hello Visual Basic .NET 2005"
        Str1 = Mid(Textbox1.Text.Lenght,1,3)
        MsgBox (Str1)

ผลลัพธ์ที่ได้ ::
------------------------------------------------------------------------------------------

ต.ย. การใช้งานฟังก์ชัน MID() แบบที่ 2
       Dim Str1 as String
       Dim StrLen as Int16
       TextBox1.Text =" Hello Visual Basic .NET 2005"
       StrLen = TextBox1.Text.Lenght
        Str1 = Mid(Textbox1.Text.Lenght,StrLen-1,StrLen)
        MsgBox (Str1)

ผลลัพธ์ที่ได้ ::

------------------------------------------------------------------------------------------