Oh this may help you Phil
At 12:54 PM -0400 2/5/05, Lars Jensen wrote:
Function Keys(extends src as dictionary) As variant()
dim ret() as Variant
dim i as integer
for i = 0 to src.Count-1
ret.Append src.Key(i)
next i
return ret
End Function
Function Values(extends src as Dictionary) As variant()
dim keys() as Variant = src.Keys
dim key as Variant
dim ret() as Variant
for each key in keys
ret.Append src.Value(key)
next key
return ret
End Function
At 11:14 AM +1000 2/9/06, Dr Gerard Hammond wrote:
At 5:51 PM -0700 1/9/06, Phil M wrote:
I don't remember... is there a syntax to allow you to traverse each
item in the Dictionary?
Something like:
For Each key As Variant, value As Variant In myDictionary
// something cool here
Next
Yeah, this is something I needed this week too.
http://www.realsoftware.com/feedback/viewreport.php?reportid=pbshbfvt
This report says that it implemented in 2005
--
Cheers,
Dr Gerard Hammond
MacSOS Solutions
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
