Boolean to Byte Command

Is there a built in VB command that converts a Boolean value into a Byte value? I've made my own function ...

VB Code:

Private Function bool(ByVal var As Boolean) As Byte
    If var = True Then
        bool = 1
    Else
        bool = 0
    End If
End Function

... but I'd prefer to use a built in command. Any? Thanks.

CByte(True) = 255

ABS(True) = 1

false is held as a zero and true is held as a minus one, so as brucevde has shown, there are numerous ways to use standard VB functions to obtain flavors of the numeric values.

you could also do

ival = iif(bval, 1, 0)