Classe Dictionary - dicionário (Scripting VBA)
Objeto que armazena pares de chave/item de dados. Para usar uma variável de classe Dictionary, ela primeiro precisa ser instanciada por exemplo
Add
Adiciona um par de chave e item a um objeto Dictionary .
Ocorrerá um erro se a chave já existir.
Arguments
O seguinte argumento é opcional
Key (Variant) - A chave associada ao item que está sendo adicionado.
Item (Variant) - O item associado à chave que está sendo adicionada.
CompareMode
Define e retorna o modo de comparação para comparar chaves de cadeia de caracteres em um objeto Dictionary . Os valores de retorno possíveis são BinaryCompare, DatabaseCompare, TextCompare.
Ocorrerá um erro se você tentar alterar o modo de comparação de um objeto Dictionary que já contém dados. A Propriedade CompareMode usa os mesmos valores que o argumento Compare para a função StrComp . Valores maiores que 2 podem ser usados para fazer referência a comparações usando IDs de localidade (LCID) específicas.
Count
Retorna um Long Long Integer que contém o número de itens em um objeto de coleção ou Dictionary . Somente leitura.
O código a seguir ilustra o uso da propriedade Count .
Dim a, d, i 'Create some variables
Set d = CreateObject("Scripting.Dictionary")
d.Add "a", "Athens" 'Add some keys and items.
d.Add "b", "Belgrade"
d.Add "c", "Cairo"
a = d.Keys 'Get the keys
For i = 0 To d.Count -1 'Iterate the array
Print a(i) 'Print key
Next
...
Exists
Retorna true se uma chave especificada existir no objeto Dictionary ; False se não houver.
Exists (Key)
Key: Valor de chave sendo procurado no objeto Dictionary .
Items
Retorna uma matriz que contém todos os itens em um objeto Dictionary .
O código a seguir ilustra o uso do método Items:
Dim a, d, i 'Create some variables
Set d = CreateObject("Scripting.Dictionary")
d.Add "a", "Athens" 'Add some keys and items
d.Add "b", "Belgrade"
d.Add "c", "Cairo"
a = d.Items 'Get the items
For i = 0 To d.Count -1 'Iterate the array
Print a(i) 'Print item
Next
...
Key
Define uma chave em um objeto Dictionary .
Se a chave não for encontrada ao alterar uma chave, ocorrerá um erro em tempo de execução .
Key (Key)
Key: O valor da chave que está sendo alterado.
Keys
Retorna uma matriz que contém todas as chaves existentes em um objeto Dictionary .
O código a seguir ilustra o uso do método Keys :
Dim a, d, i 'Create some variables
Set d = CreateObject("Scripting.Dictionary")
d.Add "a", "Athens" 'Add some keys and items.
d.Add "b", "Belgrade"
d.Add "c", "Cairo"
a = d.keys 'Get the keys
For i = 0 To d.Count -1 'Iterate the array
Print a(i) 'Print key
Next
...
Remove
Remove um membro de uma coleção ou remove um controle de um frame, páginaou formulário.
Este método exclui qualquer controle que tenha sido adicionado em tempo de execução. No entanto, tentar excluir um controle adicionado no tempo de design resultará em um erro.
Remove (Key)
Key: A posição de um membro, ou índice dentro de um conjunto. Números e cadeias de caracteres são aceitos. Se o valor for um número, o valor mínimo será zero e o máximo será o número de membros em um conjunto menos um. Se o valor for uma cadeia de caracteres, ela precisa corresponder a um nome de membro válido.
RemoveAll
O método RemoveAll remove todos os pares de itens e chave de um objeto Dictionary .
O código a seguir ilustra o uso do método RemoveAll .
Dim a, d, i 'Create some variables
Set d = CreateObject("Scripting.Dictionary")
d.Add "a", "Athens" 'Add some keys and items
d.Add "b", "Belgrade"
d.Add "c", "Cairo"
...
a = d.RemoveAll 'Clear the dictionary