Použití objektu Dictionary pomocí jazyka Visual Basic

Překlady článku Překlady článku
ID článku: 187234 - Produkty, které se vztahují k tomuto článku.
Rozbalit všechny záložky | Minimalizovat všechny záložky

Na této stránce

Souhrn

Tento článek popisuje použití komponenty z skriptování Microsoft Knihovna; Objekt Dictionary.

Další informace

Slovník je velmi podobný objekt kolekce v obou funkce a účel. Slovník, však nabízí některé funkce, která není k dispozici v kolekci. Některé z těchto funkce:
  • Možnost určit metodu porovnání klíčů. To umožňuje Klíč velká a malá písmena, např.
  • Metoda pro stanovení, existuje-li objekt ve slovníku.
  • Metoda pro extrahování všech klíčů do pole.
  • Metoda pro extrahování všech položek do pole.
  • Metoda změny hodnoty klíče.
  • Metoda pro odstranění všech položek ze slovníku.
  • Klíče slovníku nejsou omezeny na datový typ řetězec.
Poznámka: Důležitý rozdíl mezi objekt kolekce a Chování položky vlastnosti je objekt Dictionary. Pokud použijete Vlastnosti položky reference v kolekci neexistující klíč, bude k chybě. Používáte-li odkaz neexistující vlastnost položky Klíč do slovníku, že klíč bude přidáno do slovníku. Použít Existuje metoda k určení, zda klíč je přítomna v Slovník.

Objekt Dictionary je součástí knihovny Microsoft skriptování který dodáván s jazykem Visual Basic verze 5.0 nebo novější. Můžete získat Knihovna Microsoft Scripting (SCRRUN.Knihovna DLL) z instalací následující balíčky:
   Windows Script Host
   Windows NT Option Pack
   IIS 3.0
   Scripting 3.1 upgrade.
				

Podrobný příklad

  1. Zahájení nového projektu standardní EXE v jazyce Visual Basic. (Ujistěte se, že Okamžité okna.) Ve výchozím nastavení je vytvořen formulář Form1.
  2. Přidáte odkaz na Microsoft Scripting Runtime.
  3. Standardní modul přidáte do projektu.
  4. V nabídce Projekt vyberte Project1.Properties a změnit spouštěcí objekt Sub Main.
  5. Vložte následující kód do modul 1:
          Option Explicit
          Dim dict As Dictionary
    
          Sub Main()
          Dim keyArray, itemArray, element
    
          Set dict = New Dictionary
          With dict
             'set compare mode
             .CompareMode = BinaryCompare
             'add item using named arguments
             .Add Key:="mike", Item:=22
             'add item without named arguments
             .Add "joe", 33
    
             'case sensitivity and Exists method
             'does MIKE exist?
             Debug.Print "MIKE exists = " & .Exists("MIKE")
             'change key value
             .Key("mike") = "MIKE"
             'does MIKE exist?
             Debug.Print "MIKE exists = " & .Exists("MIKE")
    
             'extract keys into variant array
             Debug.Print "Array of Keys"
             keyArray = .Keys
             For Each element In keyArray
                Debug.Print element
             Next
    
             'extract items into variant array
             Debug.Print "Array of Items"
             itemArray = .Items
             For Each element In itemArray
                Debug.Print element
             Next
    
             'empty the dictionary
             .RemoveAll
             Debug.Print dict.Count & " Items in Dictionary"
    
          End With
          Set dict = Nothing
          End Sub
    
    					
  6. Spuštění projektu. Měli byste vidět, že počáteční vyhledávací klíč selhání, pak následuje po hodnotu klíče nahrazena velkým hodnota. Dále byste měli vidět, obsah varianty maticových byly extrahovány ze slovníku pomocí metod klíče a položky. Poslední naleznete v důsledku vyprazdňování slovník.

Vlastnosti

ID článku: 187234 - Poslední aktualizace: 23. dubna 2011 - Revize: 4.0
Informace v tomto článku jsou určeny pro produkt:
  • Microsoft Visual Basic 5.0 Learning Edition
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
Klíčová slova: 
kbhowto kbscript kbmt KB187234 KbMtcs
Strojově přeložený článek
Důležité: Tento článek byl přeložen pomocí software společnosti Microsoft na strojový překlad, ne profesionálním překladatelem. Společnost Microsoft nabízí jak články přeložené překladatelem, tak články přeložené pomocí software na strojový překlad, takže všechny články ve Znalostní databázi (Knowledge Base) jsou dostupné v češtině. Překlad pomocí software na strojový překlad ale není bohužel vždy dokonalý. Obsahuje chyby ve skloňování slov, skladbě vět, nebo gramatice, podobně jako když cizinci dělají chyby při mluvení v češtině. Společnost Microsoft není právně zodpovědná za nepřesnosti, chyby nebo škody vzniklé chybami v překladu, nebo při použití nepřesně přeložených instrukcí v článku zákazníkem. Společnost Microsoft aktualizuje software na strojový překlad, aby byl počet chyb omezen na minimum.
Projděte si také anglickou verzi článku:187234

Dejte nám zpětnou vazbu

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com