Example:

  1. Sub Main

    1. Dim A, B, Check

      A = 5: B = 5

      Check = CBool(A = B)

      Print Check

      A = 0

      Check = CBool(A)

      Print Check

    End Sub