1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

Preencher matriz em VB6

Discussão em 'Programação' iniciada por andremf, 17 de Maio de 2008. (Respostas: 1; Visualizações: 1457)

Estado do Tópico:
Fechado a novas mensagens.
  1. Gostava de saber como preencher uma matriz bidimensional de strings.

    Tenho um ficheiro de texto com a seguinte configuração dos dados:

    00001| 25 | 32 | 12 |
    00002| 67 | 55 | 33 | 345 |
    00003| 34 | 39 |


    Gostava de criar uma matriz W(i,j) em que i fosse o número da linha do texto e j a coluna delimitada por "|". Por exemplo, W(2,3) = 55.

    Tenho tentado ler o ficheiro linha a linha e fazer o split em cada linha, através do seguinte código:

    livre =freefile
    Open "c:\text.txt" for input as #livre

    Do while not EOF(livre)

    Line Input #livre, linha ' lé o ficheiro linha a linha
    v() = Split(linha, "|")
    n = n+1 ' vai contando o número de linhas

    Loop

    Agora eu gostava de ir preenchendo uma matriz com a ajuda de n que é o número da linha e de v(i) que é a coluna. Não sei como agregar as linhas com as colunas. Será que terei que fazer isso ainda dentro do ciclo Do antes do "Loop"? Como dimensiono essa matriz já que ela é flexivel porque por exemplo o número de colunas em cada linha pode ser diferente (no exemplo apresentado a linha 2 tem mais colunas que as linhas 1 e 3). E o número de linhas também é flexivel porque eu quero usar esta rotina para ler vários ficheiros e não têm todos o mesmo número de linhas.

    Ajudem-me a encontrar a solução para o meu problema. Tenho alguma urgência.

    Agradeço a todos que me possam ajudar

    Obrigado pela atenção!
     
Estado do Tópico:
Fechado a novas mensagens.

Partilhar esta Página