IBM Lotus Symphony


CBool-funksjonen [kjøretid]

Konverterer en strengsammenligning eller numerisk sammenligning til et boolsk uttrykk, eller konverterer et enkelt numerisk uttrykk til et boolsk uttrykk.

Syntaks:

CBool (Uttrykk1 {= | <> | < | > | <= | >=} Uttrykk2) or CBool (Tall)

Returverdi:

Bool

Parametere:

Uttrykk1, Uttrykk2: Strenger eller numeriske uttrykk som du vil sammenligne. Hvis uttrykkene samsvarer, returnerer CBool-funksjonen True (Sann), og i motsatt fall blir False (Usann) returnert.

Tall: Et numerisk uttrykk som du vil konvertere. Hvis uttrykket er lik 0, returneres False (Usann), og hvis ikke, returneres True (Sann).

I følgende eksempel brukes CBool-funksjonen til å evaluere verdien som returneres av Instr-funksjonen. Funksjonen kontrollerer om ordet "and" (og) finnes i setningen som ble angitt av brukeren.

Feilkoder

5 Ugyldig prosedyrekall

Eksempel:

Sub ExampleCBool

Dim sText As String

sText = InputBox("Skriv inn en kort setning:")

REM Kontroller om ordet »and« forekommer i setningen.

REM I stedet for kommandolinjen

REM If Instr(Input, "and")<>0 Then...

REM CBool-funksjonen brukes slik:

If CBool(Instr(sText, "and")) Then

MsgBox "Ordet »and« forekommer i setningen du skrev inn!"

EndIf

End Sub


Tilbakemelding om produktet | Annen dokumentasjon | Varemerker