MS-Access 2007의 사전 및 해시 테이블

Question

액세스 프로그램에서 해시 테이블이나 사전을 사용하고 싶습니다. 분명히, 나는 이것을 위해 Microsoft 스크립팅 런타임 라이브러리를 사용해야하지만 작동하지 않습니다.

Dim Dict1 As Dictionary

' Create a dictionary instance.
Set Dict1 = New Dictionary

".comparemode"또는 ".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

대신, 이것들은 나에게 유일하게 유발할 수있는 유일한 것입니다.

.application
.creator
.delete
etc...

단서가 있습니까?

Answer 1

글쎄, 우선 변화 이산성 에게 vbbbinarycompare.

그리고 나는 당신이 다음과 같이 당신의 세트를하고 싶다고 생각합니다.

Set Dict1 = CreateObject(Scripting.Dictionary)

편집하다 더 눈에 띄게하기 위해 Anton의 최종 해결책이 있습니다. 그는 다음과 같이 자신의 사전을 선언하는 방식을 바꿨습니다.

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