IT-Tool

IsNumber(value As Object) As Boolean

IsDouble(ByVal Value As String) As Boolean

GetStringType(ByVal value As Object) As Integer

Returns 0 for Empty string, 1 for string, 2 for integer or 3 for double.

NoInfo(Value As String) As Boolean

NumberToString(value As Integer, base As Integer) As String

The base of the number in value must be 2, 8, 10, or 16.

StringToNumber(value As String, base As Integer) As Integer

The base of the number in value must be 2, 8, 10, or 16.

CStr(value as object) as string

Insert(ByVal str As String, insertValue As String, index As Integer) As String  (1-based)

Trim(ByVal str As String) As String

LeftTrim(str As String) As String

RightTrim(str As String) As String

TrimMessage(msg As String,

                       Optional TrimEachLine As Boolean = True,

                       Optional RemoveFirstEmptyLines As Boolean = True,

                       Optional RemoveLastEmptyLines As Boolean = True) As String

PadLeft(str As String, wantedlen As Integer, Optional addedchar As String = " ") As String

PadRight(str As String, wantedlen As Integer, Optional addedchar As String = " ") As String

Concat(str1 As String, str2 As String, Optional str3 As String = "", 

             Optional str4 As String = "", Optional str5 As String = "", 

             Optional str6 As String = "", Optional str7 As String = "",

             Optional str8 As String = "", Optional str9 As String = "", 

             Optional str10 As String = "") As String

MergeStrings(msg As String, insertedValue As String,

                       Optional rowIndex As Integer = 1,

                       Optional columnIndex As Integer = -1,

                       Optional insertWidth As Integer = -1,

                       Optional insertWholeColumn As Boolean = True,

                       Optional totalWidth As Integer = -1,

                       Optional replace as Boolean = False) As String

This function merges two texts and inserts spaces and new lines if required.
rowIndex: the row/line of the msg where the text is inserted (1-based)

columnIndex: the column where the text is inserted (-1 is automatic on the right, 1-based)

insertWidth: the width of the inserted value (-1 is automatic on the largest line size)

insertWholeColumn: When true, the text is inserted in all lines of the message as a complete column. If false, only on the applicable lines.

totalWidth: limits or expands the total width of the resulted text. (-1 means automatic to the maximum size, 0 means no changes, other values above 0 means all lines have that width.) 

replace: instead of a an insertion, the text is replaced.

SortString(value As String, Optional separator As String = vbCrLf) As String

EncodeBase64(input As String) As String

DecodeBase64(input As String) As String

Format(value As Object, style As String) As String

Lower(value As String) As String

Upper(value As String) As String

WCase(value As String) As String

Chr(c As Integer) As String

Asc(c as string) as integer

ReplaceLine(msg As String, replacement As String, lineNumber As Integer,

                     Optional deleteLine As Boolean = False, Optional Find As String = "") As String

This function will replace or delete a complete line for a provided lineNumber (1-based) or a line that contains the 'Find' string.

Replace(base As String, search As String, replacement As String, 

                Optional CaseInsensitive As Boolean = False) As String

Contains(input as string, search as string) as Boolean

Substr(s As String, from As Integer, Optional len As Integer = Integer.MaxValue)  (0-based)

GetPart( input As String,  line As Integer,  from As Integer, 

              Optional  len As Integer = -1, Optional lines as Integer = 1) As String

This function returns a part of a string, as defined by the input variables

input: complete input text

line:   the line where the part is located (1-based), -1 means that 'from' is the actual position

from: Either the column position (1-based) when line is entered  
          or the actual position (0-based) when line is -1

len:    length of text to be returned. -1 means maximum length (all)

lines: amount of lines to be returned. Default is 1, so only one line but it is possible to retrieve 
           columns with multiple rows from a text. -1 means maximum amount of lines till the end.

GetPartOnSearch(input As String, search As String, Optional offset As Integer = 0,

                Optional length As Integer = -1,

                Optional trim As Boolean = True) As String

This function returns a part of a string, as defined by the input variables

input:     complete input text

search: text to be searched, the text after the searched text will be returned

offset:   determines the offset, relative to the searched text.

length: returns the length of the returned text. -1 means till the end of the line

trim:     determines if the found string is trimmed.

LinesAmount(input as string) as Integer

Len(str As String) as Integer

Pos2LineCol(input As String, position As Integer) As String

FindPos(ByVal input As String, search As String, _

                                 Optional start As Integer = 1, 

                                 Optional LineOrCol As Integer = 0) As Integer  (1-based)

LineOrCol: 0=Line, Column       1=Line     2=Column

FindLineCol(ByVal input As String, search As String, _

                             Optional start As Integer = 1, 

                              Optional LineOrCol As Integer = 0) As String  (1-based)

LineOrCol: 0=Line, Column       1=Line     2=Column

Money(d As Object) As String

Entry(n As Integer, s As String, Optional delim As String = ",") As String 

         (n is 0-based, -1 is last item, -2 is second last, etc.)

Index(s As String, search As String, Optional delim As String = ",") as Integer

Inlist(search As String, list As String, Optional delim As String = ",") As Boolean

Split(s As String, Optional delimiter As String = ",", 
        Optional removeEmptyEntries As Boolean = False) as String()

SplitResult(index as integer)  (0-based)

GetSplitCount() As Integer

GetSplitCurrentIndex() As Integer (0-based)

SetSplitIndex(index As Integer) As Boolean (0-based)

GetSplitValue(index As Integer) As String (0-based, -1 is last item, -2 is second last, etc.)

GetSplitValue() As String

ReadSplit() As Boolean

Tab2Spaces(Input As String) (with tabsettings sets previously)

TabToSpaces(Input As String, TabSize As Integer)

Tab2Spaces(Input As String, TabStops As String)

Count(Input As String, Search As String) As Integer

GetBeginLetter(input As String) as string            Gets the first basic letter for accented letters 

ChangeLetters(InputString As String) as string   Transforms accented letters to basic letters