Task

Using two Arrays of equal length, create a Hash object
where the elements from one array (the keys) are linked
to the elements of the other (the values)



Related task

   Associative arrays/Creation


Dim As String keys(1 To 5) = {"1", "2", "3", "4", "5"}
Dim As String values(1 To 5) = {"one", "two", "three", "four", "five"}
Dim As String hash(Lbound(keys) To Ubound(keys))
Dim As Integer i, temp
 
For i = Lbound(values) To Ubound(values)
    temp = Val(keys(i))
    hash(temp) = values(i)
Next i 
 
For i = Lbound(hash) To Ubound(hash)
    Print keys(i); " "; hash(i)'; " "; i
Next i
Sleep