GetAllSettings İşlevi

Önemli : Bu makale makine çevisidir. Bkz. yasal uyarı. Bu makalenin İngilizce sürümüne buradan ulaşabilirsiniz.

Not : Microsoft Jet ifade hizmeti güvenli olmayabilecek deyimleri engeller korumalı alan modunda çalışıyorsa işlevi, yöntemi, nesne veya bu konuda açıklanan özelliğini devre dışı bırakılır. Korumalı alan modu hakkında daha fazla bilgi için Yardım'da "korumalı alan modu için" arayın.

Bir uygulamanın giriş Windows kayıt defterinde veya (Macintosh) anahtar ayarlarını ve ilgili değerleri (başlangıçta SaveSettingile oluşturulan) listesini döndürür uygulamanın başlatma dosyasındaki bilgileri.

Söz dizimi

GetAllSettings ( UygAdı bölüm )

GetAllSettings işlevi sözdiziminde aşağıdaki bağımsız değişkenler bulunur:

Bağımsız Değişken

Açıklama

UygAdı

Gerekli. Dize ifadesi içeren anahtar ayarlarını istenen proje veya uygulama adı. Macintosh'ta, bu sistem klasöründeki Tercihler klasöründe başlatma dosyasının dosya adıdır.

Bölüm

Gerekli. Anahtar ayarlarını istenen bölümün adını içeren eifadeyi dize. GetAllSettings içerikleri olan iki boyutlu dizi dizeleri anahtar ayarlarını belirtilen bölüm ve karşılık gelen değerleri içeren bir Değişken döndürür.


Notlar

GetAllSettings UygAdı veya bölüm yoksa, bir başlatılmamış Variant verir.

Örnek

Not : Aşağıdaki örneklerde, bu işlevin Visual Basic for Applications (VBA) modülünde kullanımı gösterilir. VBA ile çalışma hakkında daha fazla bilgi için, rama'nın yanındaki açılan listede Geliştirici Başvurusu'nu seçin ve arama kutusuna bir veya birden çok terim yazın.

Bu örnekte önce UygAdıbelirtilen uygulamayı Windows kayıt defterinde girişlerini yapmak için SaveSetting deyimini kullanır ve sonra ayarları görüntülemek için GetAllSettings işlevi kullanılmaktadır. Uygulama ve bölüm adlarını GetAllSettingsile geri alınamaz dikkat edin. Son olarak, DELETESETTING deyimi uygulamanın girdilerini kaldırır.

' 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"

Not : Makine Çevirisi Yasal Uyarısı: Bu makale, insan müdahalesi olmadan bir bilgisayar sistemi tarafından çevrilmiştir. Microsoft bu makine çevirilerini İngilizce bilmeyen kullanıcıların Microsoft ürünleri, hizmetleri ve teknolojileriyle ilgili içeriklerden yararlanmasına yardımcı olmak için sunar. Bu makale makine çevirisi olduğundan sözcük, cümle dizilimi ve gramer hataları içerebilir.

Yeteneklerinizi geliştirin
Eğitimleri keşfedin
Yeni özellikleri ilk olarak siz edinin
Office Insider Programına Katılın

Bu bilgi yararlı oldu mu?

Görüşleriniz için teşekkür ederiz!

Geri bildiriminiz için teşekkürler! Office destek temsilcilerimizden biriyle görüşmeniz yararlı olabilir.

×