Type Testing and Conversion

Public Function BoolFromStr(s As String) As Boolean

Parse a string to a boolean value.
False values are "False", "No", "Off", "0" - anything else is True

Public Function BoolToBit(B As Boolean) As Integer

Return a boolean value as a bit (0 or 1).


Public Function BoolToStr(B As Boolean) As String

Return a boolean value as 'True' or 'False'.


Public Function DateOnly(d As Date, Optional DefTime As Date = #12:00:00 AM#) As Date

Returns the date part only of a date/time.
Optionally sets a specific time of day (default is midnight)

Public Function DateOnlyVar(d As Variant, Optional DefTime As Date = #12:00:00 AM#) As Variant

Like DateOnly(), but will accept a variant that may be Null, a Date or a String.

Public Function IsInteger(v As Variant) As Boolean

Is the variable's value an integer ? The test is regardless of type, so for example a double type variable with a value of 15.0 would return true

Public Function IsValidBool(s As String) As Boolean

Does the string represent a valid boolean value ? Not case sensitive; Accepts: "False", "True", "No", "Yes", "Off", "On", "0", "1", "-1"

Public Function IsWeekend(InputDate As Date) As Boolean

Is the date on a Weekend ?

Public Function TimeOnly(d As Date) As Date

Returns the time part only of a date/time.


Public Function TimeOnlyVar(d As Variant) As Variant

Like TimeOnly(), but will accept a variant that may be Null, a Date or a String.