9.4.1 IsEmptyReg (レジストリサブキーの中身が空かどうかを調べる)
- 機能
-
レジストリサブキーの中身が空かどうかをチェックし,結果を真(True)か偽(False)で返します。
チェックの際に例外にするレジストリサブキーを指定できます。
- 形式
IsEmptyReg ( RegKey , SubKey 〔, ExceptSubKey1 , ExceptSubKey2 , …〕 )
- 指定項目
-
- RegKey
-
レジストリキーを指定します。
この値は次のどれかになります。
-
HKEY_CLASSES_ROOT
-
HKEY_CURRENT_USER
-
HKEY_LOCAL_MACHINE
-
HKEY_USERS
-
- SubKey
-
チェックするレジストリサブキーを文字列,または値を格納した変数名で指定します。
- ExceptSubKey1〜27
-
チェックのときに例外にするレジストリサブキーがある場合,例外にするレジストリサブキーを文字列,または値を格納した変数名で指定します。
複数のレジストリサブキーを指定できます。
- 説明
-
指定されたレジストリサブキーの中にレジストリサブキー,またはエントリが存在するかどうかをチェックし,結果をコマンドの実行結果として返します。中身が空の場合は真(True)を,それ以外の場合は偽(False)を返します。
例外にするレジストリサブキーが指定されている場合は,例外キー以外のレジストリサブキー,またはエントリが存在するかどうかをチェックします。
- 例
' JP1/Scriptのレジストリサブキーの中身が空かどうかを調べる。 Dim regKey ,subKey ,isEmp regKey = HKEY_LOCAL_MACHINE subKey = "Software\Hitachi\JP1/Script" isEmp = IsEmptyReg( regKey ,subKey ,"PathName" ) If isEmp = True Then MessageBox( "Empty !" ) Else MessageBox ( "Not Empty !" ) End
- 対象バージョン
-
JP1/Script 01-00以降