USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  _ Redimensionar uma matriz (DESAFIO)
wilKs
ITABORAÍ
RJ - BRASIL
Postada em 23/06/2004 16:33 hs            
   Olá!
   Usei o código abaixo para criar as matrizes A e B.
   No primeiro elemento de A, joguei todos os elementos de B.
   De modo que, para acessar os elementos de A, uso a referência: A(1)(nº) = ...
   O problema, é que quando tento aumentar os elementos de A(1),
não funciona o comando usado para redimensionar uma matriz comum...
   A quem puder ajudar, grato.
 
   Dim A(), B()
   ReDim A(10), B(10)
   A(1) = B
   ReDim Preserve A???
 
     
~Ð@®£@Ñ
Pontos: 2843 Pontos: 2843 Pontos: 2843
PELOTAS
RS - BRASIL
Postada em 23/06/2004 16:59 hs            
n=ubound (a) 'tamanho do elemento
ReDim Preserve a(n + 1)
     
wilKs
ITABORAÍ
RJ - BRASIL
Postada em 23/06/2004 17:12 hs            
   Darlan,
   isto redimensionará toda a matriz A, e não a submatriz dentro de A(1)...
 
     
~Ð@®£@Ñ
Pontos: 2843 Pontos: 2843 Pontos: 2843
PELOTAS
RS - BRASIL
Postada em 23/06/2004 21:33 hs            
submatriz dentro de A??
te explicar melhor.. não existe submatriz
o que voce criou foi dois vetores A e B
cara naum to entendendo, para usar matriz usa assim
dim a(10,10)
 
     
wilKs
ITABORAÍ
RJ - BRASIL
Postada em 23/06/2004 22:50 hs            
   É, eu sei...
   É q me encontro na situação do tipo a(10000, 10000, 10000) em que
apenas o 1º item precisaria de uma quarta dimensão de 10000 elementos.
 
   Mas valeu a força.
 
     
~Ð@®£@Ñ
Pontos: 2843 Pontos: 2843 Pontos: 2843
PELOTAS
RS - BRASIL
Postada em 23/06/2004 23:21 hs            
pode usar assim tambem..
 
public type estrutura
   elemento1 as string
   elemento2 as integer
   campoN as double
end type
 
dim n(10) as estrutura
 
n(1).elemento1 = "teste"
n(1).campoN = 2342342342
 
nao adianta??
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página