指定した文字列が半角文字かどうかを調べて，結果を真（True）か偽（False）で返します。

IsSingleChar ( String )

String

調べる文字列，または値を格納した変数名を指定します。

この値に長さ0の文字列（""）を指定した場合は，偽（False）を返します。

指定した文字列のすべての文字が半角文字かどうかを調べて，結果をコマンドの実行結果として返します。すべての文字が半角文字である場合は真（True）を，それ以外の場合は偽（False）を返します。

Shift-JISコードでは半角かな文字は1バイトのコードで表されますが，日本語EUCコードでは半角かな文字は2バイトのコードで表されます。また，UTF-8では半角かな文字は3バイトのコードで表されます。このコマンドは，Shift-JISコードの半角かな文字は半角文字とみなしますが，EUCコード，またはUTF-8の半角かな文字は全角文字とみなします。

'グローバル変数：＃の内容が半角文字なのかそれ以外なのかを調べる。
Dim  buff
buff = GetGV ( "#" )
If  IsSingleChar ( buff )  Then
    Message( Target_DispOn, "実行結果","#" + buff )
Else
    Message( Target_DispOn, "実行結果","項番" + buff )
End If