Página 1 de 1

Algum maluco aqui programa em VB ?

Enviado: Sex Nov 11, 2005 3:35 pm
por Valiant
Tô com uma dúvida em um comando aqui no VB6. Algum doido do KM entende de VB ? :?

Enviado: Sex Nov 11, 2005 3:49 pm
por Pereirao
EEEU !!! Chapolin Colorado !

Manda 8)

Enviado: Sex Nov 11, 2005 3:56 pm
por ReiserFS
já programei em VB num passado muito distante, porem não lembro de nada.

No momento somente
C
C++
Java
BASH
PHP

Delphi (meio esquecido mas desenrolo)
Pascalzin (idem acima) pascal e delphi da no mesmo heheheh.

VB (Deletado da memoria) :P

Enviado: Sex Nov 11, 2005 4:12 pm
por EduardoBerto
Pereirao escreveu:EEEU !!! Chapolin Colorado !

Manda 8)
Manja mas é enroladooooooooo.....!!!!!!!!!!!!!!!

Pereirão, antes q me esqueça...VSF

X

Enviado: Sex Nov 11, 2005 5:06 pm
por Valiant
EduardoBerto escreveu:
Pereirao escreveu:EEEU !!! Chapolin Colorado !

Manda 8)
Manja mas é enroladooooooooo.....!!!!!!!!!!!!!!!

Pereirão, antes q me esqueça...VSF

X
Huhauhauhauha... Os dois se amam mesmo... :lol:

Pereira, é o seguinte: Eu uso um objeto aqui chamado MSFlexGrid. É uma gradezinha.

Bom, nessa grade eu relaciono, entre outras coisas, nomes de clientes. Pra facilitar, eu fiz uma "janelinha" (form) onde a pessoa digita o nome e ele busca nessa grade.

Acontece que eu pretendo usar essa "janelinha" em mais de uma grade. Então eu queria saber como faço pra atribuir a uma variável a condição de objeto e apontar essa condição pra grade onde eu quero buscar os nomes. Mais ou menos como se eu dissesse ao programa: olha, "x" aqui refere-se ao objeto grade lá daquele form.

Com isso, eu só troco pra onde o "x" vai apontar, logo no início da rotina, e ele executa o resto. Senão eu vou precisar escrever uma rotina pra cada grade, porque muda o nome e o form onde ela está.

Entendeu ???? 8)

Enviado: Sex Nov 11, 2005 5:24 pm
por Pereirao
Entendi mais ou menos...

Você pode passar o FlexGrid como parâmetro da sub ou function que chama a tal janelinha.

Entendeu ?

Vamos supor:

Em um form você tem 1 label L1, um botão B1, um label L2 e um botão B2

No click do B1 você coloca:

Código: Selecionar todos

Call ChamaJanelinha( L1 )
No click do B2 você coloca:

Código: Selecionar todos

Call ChamaJanelinha( L2 )
Daí você cria uma sub:

Código: Selecionar todos

Sub ChamaJanelinha( X As Label )
  Janelinha.Show vbModal
  X.Caption = Janelinha!T1.Text
End Sub
No form Janelinha, vai ter um textbox chamado T1 e um botão de OK, sei lá...

No click do OK você coloca:

Código: Selecionar todos

Me.Hide
Então, se você clicar em B1, ele vai atualizar a L1 com o texto digitado na Janelinha. Se clicar em B2, ele atualiza L2.

Veja que eu passo uma referência da label como parâmetro da sub (X) e utilizo essa referência prá trabalhar (X.Caption)

Resolvido ?
:wink:

Enviado: Sex Nov 11, 2005 6:21 pm
por Valiant
Não é nada disso, rsrsrs.... :P

Depois eu te explico melhor no TS. Não consegui me expressar bem aqui, acho. É meio complicado mesmo, assim, escrevendo.

Vlw pela atenção, por enquanto. 8)

Enviado: Sex Nov 11, 2005 6:31 pm
por Pereirao
Presta atenção que é isso mesmo...

No exemplo que eu fiz, eu transformei um objeto label ( L1 ou L2 ) em uma variável ( X )

Veja que, prá mudar o caption de L1 ou L2 eu não escrevi L1.Caption = "onono" ou L2.Caption = "onono"

O comando X.Caption = "onono" vai alterar o caption da label que foi passada como parâmetro da sub ou função Sub Teste( X As Label )

No lugar de Label, Text, você vai usar seu FlexGrid, etc... Só dei um exemplo... Quer moleza ? Come sopa de minhoca !

Enviado: Sáb Nov 12, 2005 12:28 am
por -=KM=-zero
LÓU!

viajei nesse tópico :shock: :shock: :P :evil: :evil:

Enviado: Sáb Nov 12, 2005 12:50 am
por Freeman
vocês tão falando sério mesmo?

:lol:

:oops:

Enviado: Sáb Nov 12, 2005 1:30 am
por Valiant
Pereirao escreveu:Presta atenção que é isso mesmo...

No exemplo que eu fiz, eu transformei um objeto label ( L1 ou L2 ) em uma variável ( X )

Veja que, prá mudar o caption de L1 ou L2 eu não escrevi L1.Caption = "onono" ou L2.Caption = "onono"

O comando X.Caption = "onono" vai alterar o caption da label que foi passada como parâmetro da sub ou função Sub Teste( X As Label )

No lugar de Label, Text, você vai usar seu FlexGrid, etc... Só dei um exemplo... Quer moleza ? Come sopa de minhoca !
Acho que entendi, tio pereira.... Agora vou testar lá. Depois falo pra vocês o que deu, se o pc não explodiu... :D