VB.NET Mid() – Code Sample
Posted by asp.net videos on Tuesday, February 8, 2011 · Leave a Comment
Premium (Not Free) Video Tutorials
Free Video Tutorials & Free Tools
Premium (Not Free) Video Tutorials
Free Video Tutorials & Free Tools
VB.NET Mid Example – Code Sample Syntax
Abstract: – Illustrates using VB.NET Mid Code Example.
*** 2. Mid Syntax ***
Purpose:
Returns the specified number of characters from the string starting
at the specified position. If the length is not specified, all of the
characters to the end of the string are returned
Syntax:
Mid(string, startIndex[, length])
Parameters |
Description |
string |
Required – String of which you want to return a portion
|
startIndex |
Required – Integer (not zero-based) that indicates
starting point
|
length |
Optional – Integer that indicates number of characters
to return. If the length is not specified, all of the characters to
the end of the string are returned
|
Result Data Type |
Description |
string |
Returns the specified number of characters from the string starting
at the specified position. If the length is not specified, all of the
characters to the end of the string are returned
|
*** 3. Mid – Quick Example ***
|
Dim strField As String = ” This “
Console.WriteLine(“[” + LTrim(strField) + “]”) ‘Returns [This ] with leading spaces removed
|
*** 4. Mid – Full Example ***
Mid Example Output Screenshot
Step 1: Click Visual Basic to Cut-n-paste code into clsMid.vb
Public Class clsMid
Public Sub Main()
'****************************************************************************************
' Purpose: Returns the specified number of characters from the string starting
' at the specified position. If the length is not specified, all of the
' characters to the end of the string are returned
'
' Syntax: Mid(string, startIndex[, length])
'
' Parameter1: string - Required - String of which you want to return a portion
'
' Parameter2: startIndex - Required - Integer (not zero-based) that indicates
' starting point
'
' Parameter3: length - Optional - Integer that indicates number of characters
' to return. If the length is not specified, all of the characters to
' the end of the string are returned
'
' Result: string - Returns the specified number of characters from the string starting
' at the specified position. If the length is not specified, all of the
' characters to the end of the string are returned
'
' Quick Example: Dim strField As String = " This "
' Console.WriteLine("[" + LTrim(strField) + "]") 'Returns [This ] with leading spaces removed
'
'****************************************************************************************
'****************************************************************************************
' Example #1: Mid(string, startIndex[, length])
' Returns the specified number of characters from the string starting
' at the specified position. If the length is not specified, all of the
' characters to the end of the string are returned
'****************************************************************************************
Console.WriteLine("Example #1: Mid(strField, 2, 3)")
Dim strField As String = "123456"
Console.WriteLine(Mid(strField, 2, 3)) 'Returns 234
'write blank line to make output easier to read
Console.WriteLine()
'Prevent console from closing before you press enter
Console.ReadLine()
End Sub
End Class |
Public Class clsMid
Public Sub Main()
'****************************************************************************************
' Purpose: Returns the specified number of characters from the string starting
' at the specified position. If the length is not specified, all of the
' characters to the end of the string are returned
'
' Syntax: Mid(string, startIndex[, length])
'
' Parameter1: string - Required - String of which you want to return a portion
'
' Parameter2: startIndex - Required - Integer (not zero-based) that indicates
' starting point
'
' Parameter3: length - Optional - Integer that indicates number of characters
' to return. If the length is not specified, all of the characters to
' the end of the string are returned
'
' Result: string - Returns the specified number of characters from the string starting
' at the specified position. If the length is not specified, all of the
' characters to the end of the string are returned
'
' Quick Example: Dim strField As String = " This "
' Console.WriteLine("[" + LTrim(strField) + "]") 'Returns [This ] with leading spaces removed
'
'****************************************************************************************
'****************************************************************************************
' Example #1: Mid(string, startIndex[, length])
' Returns the specified number of characters from the string starting
' at the specified position. If the length is not specified, all of the
' characters to the end of the string are returned
'****************************************************************************************
Console.WriteLine("Example #1: Mid(strField, 2, 3)")
Dim strField As String = "123456"
Console.WriteLine(Mid(strField, 2, 3)) 'Returns 234
'write blank line to make output easier to read
Console.WriteLine()
'Prevent console from closing before you press enter
Console.ReadLine()
End Sub
End Class
Step 2: Click Visual Basic to Cut-n-paste code into Module1.vb
Module Module1
Sub Main()
Dim myclsMid As New clsMid
myclsMid.Main()
End Sub
End Module |
Module Module1
Sub Main()
Dim myclsMid As New clsMid
myclsMid.Main()
End Sub
End Module
Prerequistes:
- Install Visual Basic (Express or Standard Edition)
- Install SQL Server Express
- Download Northwind and pubs Database
- Attach Northwind Database to Databases in Sql Express
- Attach pubs Database to Databases in Sql Express
Notes:
- Console Application is used to simplify things, but Windows Forms or Web Forms could also be used
- You can build a library of syntax examples by using same project over and over and just commenting out what you do not want to execute in Module1.vb
Instructions:
- Use Visual Basic 2010 Express or Standard Edition
- Create new project;
- Click File/New Project
- Select Console Application Template
- Select Visual Basic for Language
- name of project could be VBNET_Syntax.
- Add New folder named “StringManipulation”
- Right-click project name in solution explorer;
- add new folder;
- name of folder could be: StringManipulation
- Add Class Named clsMid to StringManipulation folder
- Right-click StringManipulation folder;
- add new item;
- Select class
- Class name could be clsMid
- Click on Visual Basic in code in step 1 above to copy code into clsMid.vb
- Click on Visual Basic in code in step 2 above to copy code into Module1.vb
- Click green arrow or press F5 to run program
|