.NET equivalent functions

Facilitates cut and paste of C#/VB .NET samples from the web, but noting that VBA string indexing is 1 based not 0 based.

Public Function Contains(str As String, ContainsString As String) As Boolean

Does the string contain the passed string ?

Public Function EndsWith(str As String, EndsWithString As String) As Boolean

Does the string end with the passed string ?

Public Function IndexOf(str As String, SubString As String, Optional StartPosition As Long = -1 , Optional Length As Long = -1) As Long

Get the 1 based index of the first occurrence of the search string in the passed string. Returns -1 if the search string is not found.


Public Function Insert(str As String, SubString As String, StartPosition As Long) As String

Inserts SubString into the string at StartPosition

Public Function LastIndexOf(str As String, SubString As String, Optional StartPosition As Long = -1 , Optional Length As Long = -1) As Long

Get the 1 based index of the last occurrence of the search string in the passed string

Public Function PadLeft(s As String, TotalWidth As Integer, Optional PadChar As String = " ") As String

Pad out the string with characters from the left until it is TotalWidth wide. If the string is TotalWidth chars wide or wider already, it is returned unmodified. This function does not truncate strings: see FixedWidthStr to pad and truncate.

Public Function PadRight(s As String, TotalWidth As Integer, Optional PadChar As String = " ") As String

Pad out the string with characters from the right until it is TotalWidth wide. If the string is TotalWidth chars wide or wider already, it is returned unmodified. This function does not truncate strings: see FixedWidthStr to pad and truncate.

Public Function Remove(str As String, StartPosition As Long, Optional Length As Long = -1) As String

Remove characters from StartPosition to end, or for Length characters

Public Function Replace(str As String, find As String, Optional ReplaceWith As String = "") As String

Same as the VBA builtin 'Replace', but having it here allows easy selection of case sensitivity

Public Function StartsWith(str As String, StartsWithString As String) As Boolean

Does the string start with the passed string ?

Public Function SubString(s As String, StartPosition As Long, Optional Length As Long = -1) As String

Get the substring at the position and length: identical to the built in Mid function. Returns an error if the StartPosition is beyond the string end. See SafeMid for a fault tolerant version.

Public Function ToLower(s As String) As String

Convert the string to lower case

Public Function ToUpper(s As String) As String

Convert the string to lower case

Public Function Trim(s As String, Optional AddlTrimChars = "") As String

Trim whitespace (space, tab, CR, LF) and additonal defined chars from the start and end of the string.

Public Function TrimEnd(s As String, Optional AddlTrimChars = "") As String

Trim whitespace (space, tab, CR, LF) and additional defined chars from the end of the string.

Public Function TrimStart(s As String, Optional AddlTrimChars = "") As String

Trim whitespace (space, tab, CR, LF) and additional specified chars from the start of the string.