LIMPANDO MATRIZES

EPISCOPAL 09/03/2010 00:19:29
#336366
tenho uma matriz:

Letra(1) = [Ô]A[Ô]
Letra(2) = [Ô]B[Ô]
Letra(3) = [Ô]C[Ô]
Letra(4) = [Ô]D[Ô]
Letra(5) = [Ô]E[Ô]

e por ai vai !!!!


*** digamos que eu quero limpar Letra(4) = [Ô][Ô]

agora como q faço para dar um UPDate na minha matriz??? tipo assimmmm

Letra(1) = [Ô]A[Ô]
Letra(2) = [Ô]B[Ô]
Letra(3) = [Ô]C[Ô]
Letra(4) = [Ô]E[Ô] <<<<<< [txt-color=#e80000]A ALTERAÇÃO APARECE AQUI[/txt-color]
Letra(5) = [Ô]F[Ô]
Letra(6) = [Ô]G[Ô]

QUERIA FAZER ISSO ....... ALGUEM COM ALGUMA IDEIA AI???

A MINHA MATRIZ TEM MAIS OU MENOS UNS 2000 ITENS .......
CLAUDIOLUCROCHA 09/03/2010 08:09:27
#336377
WOLF Pelo que entendi voce esta preenchendo a matriz e depois altera ela. Ai voce quer que ela volte a ter o conteudo inicial. Se for isso.

Crie uma SUB para inicializar Assim

Private sub INICIALIZA_MATRIZ
Letra(1) = [Ô]A[Ô]
Letra(2) = [Ô]B[Ô]
Letra(3) = [Ô]C[Ô]
Letra(4) = [Ô]D[Ô] ........
End sub

Private Load
INCIALIZA_MATRIZ
....

End sub


Ai quando voce quizer fazer o UPDATE voce chama a INICIALIZA_MATRIZ que ela vai voltar ao estado inicial.
EPISCOPAL 09/03/2010 08:17:38
#336379
Citação:

nao entendi o que vc quis dizer!!!!!



eu tenho uma matriz assim:
Letra(1) = [Ô]A[Ô]
Letra(2) = [Ô]B[Ô]
Letra(3) = [Ô]C[Ô]
Letra(4) = [Ô]D[Ô]
Letra(5) = [Ô]E[Ô]

depois eu deleto um valor dela no decorrer do programa:
Letra(4) = [Ô][Ô]

depois como faço pra ela ficar assim???:
Letra(1) = [Ô]A[Ô]
Letra(2) = [Ô]B[Ô]
Letra(3) = [Ô]C[Ô]
Letra(4) = [Ô]E[Ô]
CLAUDIOLUCROCHA 09/03/2010 08:25:27
#336380
Voce cria uma Rotina que vai preencher a matriz como falei antes depois voce mexe o que quizer na matriz. Para voltar a fazer ela ficar do mesmo jeito, basta chamar a rotina novamemte.

Voce deve estar colocando isso no LOAD do form. entao ficaria assim

Sub Load

INICIALIZA_MATRIZ

Letra(4) = [Ô][Ô]

INICIALIZA_MATRIZ

End sub

Sub INICIALIZA_MATRIZ
Letra(1) = [Ô]A[Ô]
Letra(2) = [Ô]B[Ô]
Letra(3) = [Ô]C[Ô]
Letra(4) = [Ô]E[Ô]
end sub

Na segunda linha do LOAD ela vai apagar a letra(4) e depois chama novamente a rotina INICIALIZA_MATRIZ que vai preencher tudo de novo.
EPISCOPAL 09/03/2010 08:53:50
#336381
nao da certo naum .......... arquivo emn anexoooo
CLAUDIOLUCROCHA 09/03/2010 09:23:28
#336383
Veja o novo botao que coloquei ele atualiza a matriz e mostra os dados
Note que no LOAD ele chama a rotina para preencher
EPISCOPAL 09/03/2010 10:51:21
#336399
Claudio vc naum entendeu mesmooooooo ....................


EPISCOPAL 09/03/2010 11:20:50
#336401
eu quero deste jeito .......... mas quero limpar a matriz sem ajuda do richtextbox

tudo via codigo .........
MARCELO.TREZE 09/03/2010 12:01:10
#336408 Resposta escolhida
veja se é isto que deseja

coloque um listbox e um command button em um novo projeto, e cole este código

Dim Letra(0 To 6) As String
Dim matriz As Integer


Private Sub Command1_Click()
matriz = 4
List1.Clear
For f = 1 To UBound(Letra)
If f = matriz Then
f = f + 1
End If
Letra(matriz) = Letra(f)
List1.AddItem Letra(matriz)
Next f
End Sub

Private Sub Form_Load()
carrega_matriz
End Sub
Sub carrega_matriz()
List1.Clear
Letra(1) = [Ô]A[Ô]
Letra(2) = [Ô]B[Ô]
Letra(3) = [Ô]C[Ô]
Letra(4) = [Ô]D[Ô]
Letra(5) = [Ô]E[Ô]
Letra(6) = [Ô]F[Ô]
For f = 1 To 6
List1.AddItem Letra(f)
Next f
End Sub


depois diga se é mais ou menos isto que deseja?

de onde vem os dados que preenche a matriz?

e qual o objetivo?

até
EPISCOPAL 09/03/2010 12:23:13
#336416
é isso mesmo que eu quero ......... só que eu queria fazer tudo via codigo sem precisar de listbox, textbox, richtextbox, etcbox .... rsrsrsrs



finalidade:
estou desenvolvendo um editor de texto .... e nele insere-se hiperlink, estas hiperlinks são colocadas em uma matriz ..... certo

qdo o usuario deletar algum link deleta-se ela na matriz tambem ........ entendeu???

NAO QUERO FICAR USANDO MUITO CONTROLE EMBUTIDO ........ APESAR Q FACILITA EM MUITO
MARCELO.TREZE 09/03/2010 12:47:31
#336423
Estive olhando um exemplo postado por você porém ainda tenho algumas duvidas

bom vou tentar entender para ajudar, pois parecer ser mais fácil do que imagina.

você não precisa criaar varias matrizes com varios hiperlinks, você poderia incluir tudo e uma unica string e fazer a alteração conforme necessário.

exemplo

Dim Hiper As String
Hiper = [Ô]www.site1.com.br|www.site2.com.br|www.site3.com[Ô][Ô]

bastaria fazer isto

Hiper = Replace(Hiper, [Ô]|[Ô] & [Ô]www.site2.com.br[Ô])

depois vc cria a array

dim Vetor() As String
Vetor = Split(Hiper,[Ô]|[Ô])

creio ser mais simples desta forma.

se nào entender poste uma imagem de como ficaraiam os hiperlinks no richtexbox
Página 1 de 2 [11 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar