CBool Function

Konvertuje poredjenje znaka ili brojnog izraza u Boolean izraz, ili konvertuje jedan brojni izraz u Boolean izraz.

Sintaksa:

CBool (Izraz_1 {= | <> | < | > | <= | >=} Izraz_2) or CBool (Number)

Vrati vrijednost:

Bool

Parametri:

izraz_1, izraz_2: Bilo koji znak ili numericki izraz koji zelis konvertovati.ako se izrazi poklapaju, CBool funkcija vraca True, u drugom slucaju Netačno je vracena.

Number: Brojni izraz koji zelis konvertovati. Ako je izraz jedank 0, Netačno je vracena, u drugom slucaju True je vracena.

Slijedeci primjerkoristi CBool funkciju da procijeni vrijednost koja je vracena Instr funkcijom. Funkcija provjerava ako je rijec "i"nadjena u recenici koja je unesena od korisnika.

Primjer:

Sub ExampleCBool
Dim sText As String
    sTektst = PoljeUnosa("Molimo unesite kratku recenicu:")
    REM Dokazi ukoliko je rijec »i« pojavljivana u recenici.
    REM Umjesto komandne linije
    REM ako Instr(Unos, "i")<>0 onda...
    REM the CBool je primjenjena kao sto slijedi:
    If CBool(Instr(sTekst, "i")) onda
        poruka_polje "Rijec »i« se pojavljuje u recenici koju ste unijeli!"
    EndIf
End Sub