Conteúdo

# 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.

### Sintaxe:

      CBool (expression As Variant) As Boolean

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

### Tipo de retorno:

Booleano

### Parâmetros:

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.

### Códigos de erro

5 Chamada de procedimento inválido

### Exemplo:

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

Tópicos relacionados

Função CByte

Função CCur

Função CDate

Função CDbl

Função CDec

Função CInt

Função CLng

Função CSng

Função CStr

Necessitamos da sua ajuda!