systemappsprogram.blogspot.com

VB.net String Functions

 Syntax String Functions with Description
AscAscW   -> Returns an Integer value representing the char code corresponding to a char.
Related imageDim codeInt As Integer ' The following line of code sets codeInt to 65. codeInt = Asc("A") ' The following line of code sets codeInt to 97. codeInt = Asc("a") ' The following line of code sets codeInt to 65. codeInt = Asc("Apple")
 
ChrChrW   -> Returns the character associated with the specified character code.
Dim associatedChar As Char ' Returns "A". associatedChar = Chr(65) ' Returns "a". associatedChar = Chr(97) ' Returns ">". associatedChar = Chr(62) ' Returns "%". associatedChar = Chr(37)
 
Filter       -> Returns a zero-based array containing a subset of a String array 
Dim TestStrings(2) As String TestStrings(0) = "This" TestStrings(1) = "Is" TestStrings(2) = "It" Dim subStrings() As String ' Returns ["This", "Is"]. subStrings = Filter(TestStrings, "is", True, CompareMethod.Text) ' Returns ["This"]. subStrings = Filter(TestStrings, "is", True, CompareMethod.Binary) ' Returns ["Is", "It"]. subStrings = Filter(TestStrings, "is", False, CompareMethod.Binary)

Format ->  According to instructions contained in a format String expression.
Dim TestDateTime As Date = #1/27/2001 5:04:23 PM# Dim TestStr As String ' Returns current system time in the system-defined long time format. TestStr = Format(Now(), "Long Time") ' Returns current system date in the system-defined long date format. TestStr = Format(Now(), "Long Date") ' Also returns current system date in the system-defined long date ' format, using the single letter code for the format. TestStr = Format(Now(), "D") ' Returns the value of TestDateTime in user-defined date/time formats. ' Returns "5:4:23". TestStr = Format(TestDateTime, "h:m:s") ' Returns "05:04:23 PM". TestStr = Format(TestDateTime, "hh:mm:ss tt") ' Returns "Saturday, Jan 27 2001". TestStr = Format(TestDateTime, "dddd, MMM d yyyy") ' Returns "17:04:23". TestStr = Format(TestDateTime, "HH:mm:ss") ' Returns "23". TestStr = Format(23) ' User-defined numeric formats. ' Returns "5,459.40". TestStr = Format(5459.4, "##,##0.00") ' Returns "334.90". TestStr = Format(334.9, "###0.00") ' Returns "500.00%". TestStr = Format(5, "0.00%")
 
FormatCurrency  ->Returns an expression formatted as a currency value 
Dim TestDebt As Double = -4456.43 Dim TestString As String ' Returns "($4,456.43)". TestString = FormatCurrency(TestDebt, , , TriState.True, TriState.True)
 
FormatDateTime      -> Returns a string expression representing a date/time value.
Dim TestDate As DateTime = #3/12/1999# ' FormatDateTime returns "Friday, March 12, 1999". ' The time information is neutral (00:00:00) and therefore suppressed. Dim TestString As String = FormatDateTime(TestDate, DateFormat.LongDate)

FormatNumber-> Returns an expression formatted as a number.
Dim TestNumber As Integer = 45600 ' Returns "45,600.00". Dim TestString As String = FormatNumber(TestNumber, 2, , , TriState.True) 

FormatPercent->Returns an expression formatted as a percentage with a trailing % character.
Dim TestNumber As Single = 0.76 ' Returns "76.00%". Dim TestString As String = FormatPercent(TestNumber)

InStr->Returns an integer specifying the start position of the first occurrence of one string within another.
' String to search in. Dim SearchString As String = "XXpXXpXXPXXP" ' Search for "P". Dim SearchChar As String = "P" Dim TestPos As Integer ' A textual comparison starting at position 4. Returns 6. TestPos = InStr(4, SearchString, SearchChar, CompareMethod.Text) ' A binary comparison starting at position 1. Returns 9. TestPos = InStr(1, SearchString, SearchChar, CompareMethod.Binary) ' If Option Compare is not set, or set to Binary, return 9. ' If Option Compare is set to Text, returns 3. TestPos = InStr(SearchString, SearchChar) ' Returns 0. TestPos = InStr(1, SearchString, "W")   
Share:

No comments:

Translate

Popular Posts

Recent Posts

Support System Software

Customer support is usually one of the key aspects for all companies, both small and large enterprises. Having a reliable customer support system will result in a positive image of your brand and will be a clear sing that you actually care about your clients and put effort into keeping them satisfied. Our team of SaaS experts have collected and tested all popular customer support software services currently available in the market. Our list should allow you to more easily decide which solution will work best for your business. Need our help to upload or customize this blogger template? Contact me with details about the theme customization you need.