Contenuto
Indice 🔎︎

# Funzione CBool

Converte un confronto tra stringhe o tra valori numerici in un'espressione booleana, oppure converte una singola espressione numerica in un'espressione booleana.

## Sintassi:

    CBool (Espressione1 {= | <> | < | > | <= | >=} Espressione2) o CBool (Numero)

## Valore restituito:

Bool

## Parametri:

Espressione1, Espressione2: stringhe o espressioni numeriche da confrontare. Se le espressioni corrispondono, la funzione CBool restituisce il valore True, diversamente restituisce False.

Numero: espressione numerica da convertire. Se l'espressione è uguale a 0, viene restituito il valore False, diversamente viene restituito True.

L'esempio seguente utilizza la funzione CBool per valutare il valore restituito dalla funzione Instr. La funzione controlla se la frase inserita dall'utente contiene la parola "e".

### Codici di errore:

5 Richiamo di procedura non valido

## Esempio:

    Sub ExampleCBool
    Dim sText As String
        sTesto = InputBox("Inserite una frase breve:")
        ' Verifica se la frase contiene la parola "e".
        ' Invece della riga di comando
        ' If Instr(Input, "e")<>0 Then...
        ' la funzione CBool viene applicata come segue:
        If CBool(Instr(sTesto, "e")) Then
            MsgBox "La frase inserita contiene la parola "e""
        EndIf
    End Sub