Observação: A função, método, objeto ou propriedade descrita neste tópico será desabilitada se o Serviço de Expressão de Jato da Microsoft estiver em execução no modo de área restrita, o que impede a avaliação de expressões potencialmente inseguras. Para obter mais informações sobre o modo de área restrita, procure por "modo de área restrita" na Ajuda.
Retorna um valor de configuração de chave da entrada de um aplicativo no registro do Windows ou (no Macintosh) no arquivo de inicialização do aplicativo.
Sintaxe
GetSetting ( appname , section, key [, default ] )
A sintaxe da função GetSetting tem esses argumentos:
Argumento |
Descrição |
Appname |
Obrigatório. expressão de cadeia de caracteres que contém o nome do aplicativo ou do projeto cuja configuração de chave é solicitada. No Macintosh, este é o nome do arquivo de inicialização na pasta Preferências na pasta Sistema. |
seção |
Obrigatório. Expressão de cadeia de caracteres que contém o nome da seção em que a configuração da chave é encontrada. |
chave |
Obrigatório. Expressão de cadeia de caracteres que contém o nome da configuração de chave a ser retornada. |
padrão |
Opcional. Expressão que contém o valor a ser retornado se nenhum valor for definido na configuração da chave. Se omitido, presume-se que default seja uma cadeia de caracteres de comprimento zero (""). |
Comentários
Se algum dos itens nomeados nos argumentos GetSetting não existir, GetSetting retornará o valor do padrão.
Exemplo
Observação: Exemplos a seguir demonstram o uso dessa função em um módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.
Este exemplo primeiro usa a instrução SaveSetting para fazer entradas no registro do Windows (ou .ini arquivo em plataformas Windows de 16 bits) para o aplicativo especificado como nome de aplicativo e, em seguida, usa a função GetSetting para exibir uma das configurações. Como o argumento padrão é especificado, algum valor é garantido para ser retornado. Observe que os nomes de seção não podem ser recuperados com GetSetting. Por fim, a instrução DeleteSetting remove todas as entradas do aplicativo.
' Variant to hold 2-dimensional array returned
' by GetSetting. Dim MySettings As Variant ' Place some settings in the registry. SaveSetting "MyApp","Startup", "Top", 75 SaveSetting "MyApp","Startup", "Left", 50 Debug.Print GetSetting(appname := "MyApp", _ section := "Startup", _ key := "Left", default := "25") DeleteSetting "MyApp", "Startup"