IBM Lotus Symphony


CBool 関数 [実行時]

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

構文:

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

戻り値:

ブール型

パラメータ:

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

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

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

エラーコード

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 "The word »and« appears in the sentence you entered!"

EndIf

End Sub


製品フィードバック | その他の資料 | 商標