目次
索引 🔎︎

# CBool Function

文字列や数値の比較演算結果、および単独の数値表式をブール型の表式に変換します。

## 構文:

    CBool (Expression1 {= | <> | < | > | <= | >=} Expression2) あるいは CBool (Number)

## 戻り値:

ブール型

## パラメーター:

Expression1, Expression2: 比較する文字列および数値の表式。CBool 関数は、2 つの表式が一致すれば True を返し、それ以外の場合は False を返します。

Number: 変換させる数値表式。表式が 0 に等しい場合は False を返し、それ以外の場合は True を返します。

下記の例は、Instr 関数から返される値を、CBool 関数を使って評価させています。この関数は、ユーザーの入力する文字列の中に「and」という単語が含まれているかを判定します。

### Error codes:

5 無効なプロシージャー呼び出しです

## 例:

    Sub ExampleCBool
    Dim sText As String
        sText = InputBox("Please enter a short sentence:")
        REM 入力した文字列中に「and」があるかを調べます。
        REM 通常こうした判定には下記のような IF 文を使います。
        REM If Instr(Input, "and")<>0 Then...
        REM ここではその代わりに CBool 関数を使って判定をしています。
        If CBool(Instr(sText, "and")) Then
            MsgBox "入力した文字列中に「and」があります。
        EndIf
    End Sub