Como Carregar Uma Matriz ?

[Divasjr]

Ola eu tenho um arquivo txt com 30 combinações de 15 nº cada e gostaria de carregar tudo em uma matriz como faze isso .se for possível fazer sem ler o arquivo também serve .

[Graymalkin]

se for possível fazer sem ler o arquivo também serve .

Acho que ler o arquivo é fundamental...

De qualquer forma, dê um exemplo desse arquivo aqui e talvez possamos ajudar melhor.

Abraços,

Graymalkin

[Divasjr]

o arquivo ta assim :

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

1 2 3 4 5 6 7 8 9 10 11 12 13 14 16

1 2 3 4 5 6 7 8 9 10 11 12 13 14 17

1 2 3 4 5 6 7 8 9 10 11 12 13 14 18

1 2 3 4 5 6 7 8 9 10 11 12 13 14 19

...........

........

[Graymalkin]

Então isso aqui deve resolver o caso:

    Dim matriz()
    
    n = FreeFile()
    Open "c:\temp\numeros.txt" For Input As #n
    texto = Input(LOF(n), n)
    Close #n
    linhas = Split(texto, vbCrLf)
    i = 0
    For Each linha In linhas
        valores = Split(linha, " ")
        ReDim Preserve matriz(i)
        matriz(i) = valores
        i = i + 1
    Next linha

Abraços,

Graymalkin