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


Public Sub Main()
Dim sValue As String[] = ["Zero", "One", "Two", "Three", "Four", "Five"]
Dim sKey As String[] = [0, 1, 2, 3, 4, 5]
Dim sCol As New Collection
Dim siCount As Short
 
For siCount = 0 To sKey.max
  sCol.Add(sValue[siCount], sKey[siCount])
Next
 
For siCount = 0 To sKey.max
  Print Str(sicount) & " = " & sCol[siCount]
Next
 
End