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