8.3.23 IsSingleChar (半角文字かどうかを調べる)
- 機能
-
指定された文字列が半角文字かどうかを調べ,結果を真(True)か偽(False)で返します。
- 形式
IsSingleChar ( String )
- 指定項目
-
- String
-
調べる文字列,または値を格納した変数名を指定します。
この値に長さ0の文字列("")を指定した場合は,偽(False)を返します。
- 説明
-
指定された文字列のすべての文字が半角文字かどうかを調べ,結果をコマンドの実行結果として返します。すべての文字が半角文字である場合は真(True)を,それ以外の場合は偽(False)を返します。
- 例1
' グローバル変数seqNoの値を判定し,半角文字の場合は"#", ' 全角文字の場合は"項番"に続けて表示する。 Dim buff buff = GetGV ( "seqNo" ) If IsSingleChar ( buff ) Then MessageBox ( "#" + buff ) Else MessageBox ( "項番" + buff ) End If
- 例2
' ローカル変数buffに格納された文字列が半角文字かどうかをチェックする。 Dim buff buff = "JP1/Script" If IsSingleChar ( buff ) Then MessageBox ( "すべての文字が半角文字である。" ) Else MessageBox ( "半角文字以外の文字が含まれている。" ) End If
- 対象バージョン
-
JP1/Script 06-00以降