IBM Lotus Symphony


CBool-funktio [käytönaikainen]

Muuntaa merkkijonovertailun tai numeerisen vertailun Boolen lausekkeeksi tai muuntaa yksittäisen numeerisen lausekkeen Boolen lausekkeeksi.

Syntaksi:

CBool (Expression1 {= | <> | < | > | <= | >=} Expression2) or CBool (Number)

Palautusarvo:

Bool (totuusarvo)

Parametrit:

Expression1, Expression2: Mitkä tahansa merkkijonolausekkeet tai numeeriset lausekkeet, joita haluat vertailla. Jos lausekkeet vastaavat toisiaan, CBool-funktio palauttaa arvon True, muutoin se palauttaa arvon False.

Number: Mikä tahansa numeerinen lauseke, jonka haluat muuntaa. Jos lausekkeen arvo on 0, palautuu arvo False, muutoin palautuu arvo True.

Seuraavassa esimerkissä määritetään CBool-funktion avulla arvo, jonka Instr-funktio palauttaa. Funktio tarkistaa, onko käyttäjän kirjoittamassa virkkeessä sanaa "and".

Virhekoodit

5 Virheellinen toimintokutsu

Esimerkki:

Sub ExampleCBool

Dim sText As String

sText = InputBox("Please enter a short sentence:")

REM Tarkista, onko sanaa »and« virkkeessä.

REM Komentorivin sijasta

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

REM sijaan CBool-funktiota käytetään seuraavasti:

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

MsgBox "The word »and« appears in the sentence you entered!"

EndIf

End Sub


Palautetta tuotteesta | Lisäohjeet | Tavaramerkit