Dizionari e tabelle hash in MS-Access 2007

Question

Voglio usare una tabella hash o un dizionario nel mio programma di accesso. Apparentemente, dovrei usare la Microsoft Scripting Runtime Library per questo, ma non funziona.

Dim Dict1 As Dictionary

' Create a dictionary instance.
Set Dict1 = New Dictionary

Impossibile trovare i metodi " .compareMode " o " .Add " ;:

With Dict1
  'set compare mode
  .CompareMode = BinaryCompare
  ' Add items to the dictionary.
  .Add 1, "Item 1"
  .Add 2, "Item 2"
  .Add 3, "Item 3"
End With

Invece, questi sono gli unici disponibili per me:

.application
.creator
.delete
etc...

Qualche indizio?

Answer 1

Bene, prima di tutto cambia BinaryCompare in vbBinaryCompare .

E penso che tu voglia fare il tuo set in questo modo:

Set Dict1 = CreateObject(Scripting.Dictionary)

Modifica Solo per renderlo più visibile, ecco l'eventuale soluzione di Anton. Ha cambiato il modo in cui ha dichiarato il suo dizionario come segue:

Dim SortValues As Scripting.Dictionary 
Set SortValues = New Scripting.Dictionary