在vb.net中搜索数组

Question

我通过从MySQL数据库中选择数据来创建数组，这是我创建数组的地方：

Dim call_costs_data(10000, 5)
While reader.Read()
    counter = counter + 1

    call_costs_data(counter, 1) = reader.GetString(0)
    call_costs_data(counter, 2) = reader.GetString(1)
    call_costs_data(counter, 3) = reader.GetString(2)
    call_costs_data(counter, 4) = reader.GetString(3)
    call_costs_data(counter, 5) = reader.GetString(4)
End While
number = counter

我用不同的表多次这样做，所以当我运行我的函数时，数据全部在数组中，而不是每次在我的循环中搜索数据库（在函数内）

我目前正在使用For循环搜索数组：

For p = 1 To number
    If call_costs_data(p, 1) = "some_value" Then
        'do something here
    End If
Next

但是因为我为循环中的这么多数组做了这个，并且在找到正确的数据之前有很多记录要循环，所以需要很长时间。

更改此选项以搜索数组的最佳方法是什么？