IsMultiChar （全角文字かどうかを調べる）

機能: 指定された文字列が全角文字かどうかを調べ，結果を真（True）か偽（False）で返します。

形式

IsMultiChar ( String )

指定項目

String: 調べる文字列，または値を格納した変数名を指定します。; この値に長さ0の文字列（""）を指定した場合は，偽（False）を返します。

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

例1

' グローバル変数seqNoの値を判定し，全角文字の場合は"項番"，
' 半角文字の場合は"#"に続けて表示する。
Dim  buff
buff = GetGV ( "seqNo" )
If  IsMultiChar ( buff )  Then
  MessageBox ( "項番" + buff )
Else
  MessageBox ( "#" + buff )
End If

例2

' ローカル変数buffに格納された文字列が全角文字かどうかをチェックする。
Dim buff
buff = "ＪＰ１／ＳＣＲＩＰＴ"
If IsMultiChar ( buff ) Then 
    MessageBox ( "すべての文字が全角文字である。" )
Else
    MessageBox ( "全角文字以外の文字が含まれている。" )
End If

対象バージョン: JP1/Script 06-00以降

8.3.24 IsMultiChar （全角文字かどうかを調べる）

8.3.24　IsMultiChar （全角文字かどうかを調べる）