Ошибка компиляции: переменная, не определена - VB

Private Sub LoadMetalsParam()
ReDim MetalsParam(0 To 5, 0 To 3)
 
MetalsParam(0, 1) = 0.000000055
MetalsParam(1, 1) = 0.0041
MetalsParam(2, 1) = 0.0000045
MetalsParam(3, 1) = 3650
MetalsParam(4, 1) = 2560000#
MetalsParam(5, 1) = 0.81
 
MetalsParam(0, 2) = 0.0000000178
MetalsParam(1, 2) = 0.0038
MetalsParam(2, 2) = 0.0000165
MetalsParam(3, 2) = 1083
MetalsParam(4, 2) = 3430000#
MetalsParam(5, 2) = 0.78
 
MetalsParam(0, 3) = 0.0000001
MetalsParam(1, 3) = 0.0004
MetalsParam(2, 3) = 0.0000122
MetalsParam(3, 3) = 1914
MetalsParam(4, 3) = 3630000#
MetalsParam(5, 3) = 0.68
 
    With cboMetalsList
     .AddItem "Выберите металл", 0
     .AddItem "Вольфрам", 1
     .AddItem "Медь", 2
     .AddItem "Железо", 3
     
     .TopIndex = metalindex
     .ListIndex = metalindex
    End With
End Sub