注: Microsoft Jet Expression Service がサンドボックス モードで実行されている場合 (安全でない可能性がある式の評価は行われません)、このトピックで説明する関数、メソッド、オブジェクト、またはプロパティは無効です。 サンドボックス モードの詳細については、ヘルプで "サンドボックス モード" を検索してください。
Windows レジストリ内のアプリケーションのエントリ、または (Macintosh 上の) アプリケーションの初期化ファイル内の情報から、キー設定とそれぞれの値 (元は SaveSetting で作成) のリストを返します。
構文
GetAllSettings ( appname , section )
GetAllSettings 関数の構文には、次の引数があります。
引数 |
説明 |
appname |
必須です。 名前またはキー設定を要求するアプリケーションまたはプロジェクトを含む文字形式です。 Macintosh では、これはシステム フォルダーの [環境設定] フォルダーにある初期化ファイルのファイル名です。 |
section |
必須です。 キー設定を要求するセクションの名前を含む文字形式です。 GetAllSettings では、内容が指定したセクションのすべてのキー設定とそれに対応する値を含む 2 次元の 配列 文字列であるバリアント型を返します。 |
解説
GetAllSettings では、appname または section のいずれかが存在しない場合、初期化されていないバリアント型を返します。
例
注: 次の例は、Visual Basic for Applications (VBA) モジュールでのこの関数の使用方法を示しています。 VBA の使用方法の詳細については、[検索] の横にあるドロップダウン リストで [開発者用リファレンス] を選び、検索ボックスに検索する用語を入力します。
この例では、最初に SaveSetting ステートメントを使用して、appname として指定されたアプリケーションの Windows レジストリにエントリを作成し、GetAllSettings 関数を使用して設定を表示します。 アプリケーション名と section の名前は、GetAllSettings で取得することはできないことにご注意ください。 最後に、DeleteSetting ステートメントでアプリケーションのエントリを削除します。
' Variant to hold 2-dimensional array returned by GetAllSettings
' Integer to hold counter. Dim MySettings As Variant, intSettings As Integer ' Place some settings in the registry. SaveSetting appname := "MyApp", section := "Startup", _ key := "Top", setting := 75 SaveSetting "MyApp","Startup", "Left", 50 ' Retrieve the settings. MySettings = GetAllSettings(appname := "MyApp", section := "Startup") For intSettings = LBound(MySettings, 1) To UBound(MySettings, 1) Debug.Print MySettings(intSettings, 0), MySettings(intSettings, 1) Next intSettings DeleteSetting "MyApp", "Startup"