Função CBool

Converte uma expressão ou um conjunto de expressões num valor booleano. Uma expressão é composta por cadeias de caracteres, números e operadores. São permitidos operadores de comparação, lógicos ou matemáticos no interior das expressões.

  CBool (expression As Variant) As Boolean

expressão pode ser um número ou um conjunto de expressões combinadas.

Booleano

expressão: Uma expressão lógica, uma fórmula matemática, uma expressão numérica ou um conjunto de expressões combinadas com operadores. Durante a avaliação da expressão, os operadores lógicos têm precedência sobre os operadores de comparação, que, por sua vez, têm precedência sobre operadores matemáticos.

A expressão pode ser um número ou uma fórmula matemática. Quando é igual a 0, é devolvido False; caso contrário, é devolvido True.

É possível combinar várias expressões, tais como expr1 [[{operador} expr2]..]. expr1 e expr2 podem ser quaisquer expressões de cadeia de caracteres ou numéricas que pretenda avaliar. CBool combina as expressões e devolve True ou False. operator pode ser um operador matemático, operador lógico ou operador de comparação.

Nos exemplos seguintes, a função CBool avalia uma expressão lógica, uma fórmula matemática e o valor devolvido pela função Instr. A função verifica se o carácter «a» está presente na frase introduzida pelo utilizador.

Sub ExampleCBool
    Print CBool( 1>2 Xor 44 ) ' resulta em True
    Print CBool( expression := 15 / 2 - 7,5 ) ' apresenta «False», uma vez que a expressão é igual a 0
    txt = InputBox("Por favor, introduza uma frase curta:")
    ' Verifica se o carácter «a» aparece na frase.
    ' Em vez da linha de comandos
    ' If Instr(Input, "a")<>0 Then...
    ' a função CBool é aplicada tal como segue:
    If CBool(Instr(txt, "a")) Then
        MsgBox "O caractere «a» aparece na frase que introduziu!"
    EndIf
End Sub