8.3.22 IsUpper半角アルファベットの大文字かどうかを調べる

機能
指定された文字列が半角アルファベットの大文字かどうかを調べ,結果を真(True)か偽(False)で返します。
形式

IsUpper ( String )

指定項目
String
調べる文字列,または値を格納した変数名を指定します。
この値に長さ0の文字列("")を指定した場合は,偽(False)を返します。
説明
指定された文字列のすべての文字が半角アルファベットの大文字かどうかを調べ,結果をコマンドの実行結果として返します。すべての文字が半角アルファベットの大文字である場合は真(True)を,それ以外の場合は偽(False)を返します。
例1

' グローバル変数Levelの値が半角アルファベットの
' "A"または"a"のどちらかをチェックする。
Dim  buff
buff = GetGV ( "Level" )
If  buff = "A"  Then
 If IsUpper ( buff ) Then
   MessageBox ( "Level : Large A." )
 Else
   MessageBox ( "Level : Small A." )
 End If
End If

例2

' ローカル変数buffに格納された文字列が
' 半角アルファベットの大文字かどうかをチェックする。
Dim buff
buff = "SCRIPT"
If IsUpper ( buff ) Then
   MessageBox ( "すべての文字が半角アルファベットの大文字である。" )
Else
   MessageBox ( "半角アルファベットの大文字以外の文字が含まれている。" )
End If

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