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以降