2

アクセスプログラムでハッシュテーブルまたは辞書のいずれかを使用したい。どうやら、私はこれにMicrosoft Scripting Runtime Libraryを使用しているはずですが、機能しません。 

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...

手がかりはありますか？

4

1 に答える 1

3

まず、BinaryCompareをvbBinaryCompareに変更します。

そして、あなたは次のようにセットをやりたいと思います：

Set Dict1 = CreateObject(Scripting.Dictionary)

編集見やすくするために、アントンの最終的な解決策を次に示します。彼は自分の辞書を宣言する方法を次のように変更しました。

Dim SortValues As Scripting.Dictionary 
Set SortValues = New Scripting.Dictionary
于 2008-12-30T15:20:42.797 に答える