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

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)

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

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

Manja mas é enroladooooooooo.....!!!!!!!!!!!!!!!
Pereirão, antes q me esqueça...VSF
X
Huhauhauhauha... Os dois se amam mesmo...
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 ????

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:
No click do B2 você coloca:
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:
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 ?

Enviado: Sex Nov 11, 2005 6:21 pm
por Valiant
Não é nada disso, rsrsrs....
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.

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
Enviado: Sáb Nov 12, 2005 12:50 am
por Freeman
vocês tão falando sério mesmo?

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...
