can any one help me with the following issue:

when we cast boolean variable to integer true gets the value -1 instead of 1
eg:
dim a as boolean
dim b as integer

a= true
b=a
msgbox(b)

we will get -1 why it is so ?