Como declaro y uso las Matrices?

[Gustavo1973]

Hola, hice una aplicacion en VB.net 2005, como no podia instalar el vb.nar 2005 en Win7 64, lo tuve que migrar a 2008. El programa funciona bien, pero algo lento.
Incluso al recorrer con la flecha haci abajo un combobox, tarda varios segundos en cambiar.
Como puedo hacerlo mas rapido?
Carga desde una base Access 2007 y acceden hasta 3 computadoras a la base. Pero aun en local es muy lento. Lo que mas me preocupa, es que no hace el salto rapido de item en item en el combobox!!!!
Desde ya muchas gracias.
Gustavo

[Gustavo1973]

Ahora lo que pasa es que no estoy muy ducho con matrices en VB.net 2008, nunca las use.
La matriz se carga desde una base de datos.
La declare en un modulo variables como publica y como no se cuantos items tendra, la declare asi.

Public AArticulos ( , ) as double

y en otro mudulo la quiera cargar asi:

Código vb:

Public Sub CargaArrayArticulos()
        Dim dt As DataTable = New DataTable("Tabla")
        Dim dr As DataRow
        Dim cnn As OleDbConnection
        Dim con As Conexion
        Dim ds As New DataSet
        Dim tabla As DataTable
        Dim precio As Double
        Dim row As DataRow
        Dim c As Integer
        'On Error GoTo rError
        con = New Conexion
        cnn = con.DBConectar
        cnn.Open()
        ds = con.consulta("select id_materiales, precio, recargo from materiales ", cnn)
        cnn.Close()
        c = 0
        For Each tabla In ds.Tables
            For Each row In tabla.Rows
                AArticulos(c, 0) = row(0)
                AArticulos(c, 1) = row(1)
                AArticulos(c, 2) = row(2)
                c = c + 1
            Next row
        Next tabla
rError:
        rtaError = evaluarError(Err)
        'de acuerdo a la respuesta, realiza...
        Select Case rtaError
            Case Finalizar
                End
            Case Reintentar
                Resume
            Case Ignorar
                Resume Next
            Case Cancelar
                'no hace nada
        End Select
    End Sub
 

Pero me tira error al ejecutar.
Como se hace?