[Resolvido] Matriz bidimensional

Estou com problemas para redimensionar minha matriz gostaria de saber se e possivel fazer o que estou tentando.

A matriz comeca da seguinte forma

Dim matriz (0,4) as string

Redim matriz (linha, 4)

Onde esse linha e incrementando em um loop ou seja a matriz vai aumentando o numero de linhas conforme o tamanho do loop

Outra duvida e que preciso passar essa matriz pra uma sub + nao estou conseguindo, Ex.

Eu preencho a matriz.

matriz(0,0) = x

matriz(0,1) = y

E depois eu chamo a sub

EnviaEmail matriz(), linha

Esse sao os paramestros q preciso passar, o conteudo da matriz e a qnt de linhas, pra q depois eu possa imprimir a matriz, a subestou chamando da seguinte forma

Public Sub EnviaEmail (matriz(), linha)

conteudo

End sub

A linha chega na sub certinho a matriz chega vazio, ja tentei varias outras formas e nao consigo levar o conteudo para a sub