IBM Lotus Symphony


Funkcija CBool [izvajalno okolje]

Pretvori primerjavo niza ali številčno primerjavo v logični izraz ali pretvori posamezen številski izraz v logični izraz.

Skladnja:

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

Vrnjena vrednost:

Bool

Parametri:

Expression1, Expression2: Katerakoli izraza nizov ali številska izraza, ki ju želite primerjati. Če se izraza ujemata, funkcija CBool vrne True, v nasprotnem primeru vrne False.

Number: Katerikoli številski izraz, ki ga želite pretvoriti. Če je izraz enak 0, funkcija vrne False, drugače pa se vrne True.

Naslednji primer uporablja funkcijo CBool za oceno vrednosti, ki jo vrne funkcija Instr. Ta funkcija preveri, če je v stavku, ki ga vnese uporabnik, najdena beseda "and".

Kode napak

5 Neveljavni klic procedure

Primer:

Sub ExampleCBool

Dim sText As String

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

REM Proof if the word »and« appears in the sentence.

REM Instead of the command line

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

REM the CBool function is applied as follows:

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

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

EndIf

End Sub


Povratne informacije o izdelku | Dodatna dokumentacija | Blagovne znamke