ARRAY .... ESSA E SIMPLES MAIS EU NAO SEI A RESPOS

USUARIO.EXCLUIDOS 02/04/2004 14:22:05
#18439 Resposta escolhida

Não é bem simples por isso o melhor é usar collection daniel

mas faz o seguinte...

DIM i as integer
dim indicetirar as long
for i = indicetirar to ubound(vetor) -1
vetor(i) = vetor(i+1)
next
redim preserve vetor(ubound(vetor)-1)

USUARIO.EXCLUIDOS 02/04/2004 14:41:16
#18460

Na mesma colection voce pode ter
um valor inteiro, uma string e um objeto

Basta usar os metodos ADD(ADICIONAR", REMOVE(REMOVER) e COUNT(QUANTIDADE)

Substitua se possivel o array por uma collection

Por exemplo

DIM COL as nel colection

COL.ADD "JOÃO"
COL.ADD "MARIA"
COL.ADD "PEDRO"
COL.REMOVE "MARIA"
COL.CLEAR