|
|
Postada em 02/04/2009 07:26 hs
Tenho um formulario e nele tem varios Textbox e em cada textbox eu chamo um segundo formulario onde eu faco varios calculos e quando eu clicar em Calcular eu gostaria que o resultado voltasse para o formulario anterior mas dentro do textbox que chamou o formulario de calculo. Como eu faco isso pois eu nao estou conseguindo eh identificar qual foi o textbox que chamou o formulario de calculo.
Desde ja grato
|
|
|
|
|
|
PH1959
|
SÃO JOSÉ DOS CAMPOS
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 02/04/2009 09:41 hs
não sei se entendi bem... mas acho q vc tem algo do tipo... text1 , text 2 ...text n, sendo q qdo um deles tiver um valor executa um determinado calculo é isso? |
|
|
|
Defende
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 02/04/2009 09:44 hs
Nao. Eh assim
FormA - eu tenho 5 textbox
FormB - eu executo alguns calculos
Qaundo eu clico em um textbox do formA eu envio o valor que esta nele para o formb que vai fazer alguns calculos e quando eu clicar num botao que esta no formb eu retorno esse valor calculado para o textbox que esta no formA que originou os dados.
Lembrando - durante a operacao o FormA vai ficar ativo por traz da aplicacao.
Valeu.
|
|
|
|
PH1959
|
SÃO JOSÉ DOS CAMPOS
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 02/04/2009 09:55 hs
vamos lá de novo... se é como disse ...(vc clica no textbox..) como vc vai botar um valor nele? |
|
|
|
Defende
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 02/04/2009 10:56 hs
Antes de clicar nele eu digito um valor e no evento click dele eu vou chamar o formB.
Bls
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
Postada em 02/04/2009 14:01 hs
O ideal Seria criar estas textbox como array ex: Text1(0) Text1(1) Text1(2) pois desta forma bastaria você criar uma variavel global dentro de um módulo para armazenar o numero da text que foi clicada exemplo: 'em um módulo Global Numero As Integer no form principal um unico evento click Private Sub Text1_Click(Index As Integer)
Numero = Index
Select Case Numero
Case 0
Form2.Show
Case 1
Form3.Show
End Select
End Sub
e no evento unload do form aberto Private Sub Form_Unload(Cancel As Integer)
Form1.Text1(Numero).SetFocus
End Sub
esta é a forma mais viavel que conheço e dispensa a criação de evento click para cada textbox |
|
|
|
