Visual Basicで連想配列と参照渡しを実現する
Visual Basicをはじめたときは連想配列とか、参照渡しなんて考えたことは一度もなかったが、他の言語を勉強して改めてVBをやり始めたらこれが出来ないなんて変だなぁって思ってしまったが、実は実現する方法があるらしい。
Dim HashData AS New Collection
HashData.Add Value Key
rData = HashData.Item(Value) 'Keyが返される
setData HashData 'HashDataを参照渡しする
'参照渡しするときにはVariantでなければならないらしい
Sub setData(ByRef Data As Variant)
Data.Add Value2 Key2
End Sub