PASSAR PARAMETROS ENTRE FORMULARIOS

GONDYN 27/01/2010 14:48:24
#332955
Boa tarde a todos,

Tenho o seguinte problema, como conseguir passar parametros de um form comum para um form Child??

Alguém poderia me ajudar??
MARCOSLING 27/01/2010 15:12:52
#332959
Resposta escolhida
é só declarar uma variável publica na form que está sendo chamada.

e para passar o valor, vc coloca:

form.variavel=1
form.show

GONDYN 28/01/2010 15:47:48
#333052
Desculpe MARCOSLING, fiz o que disse e não deu certo, talvez eu não tenha feito certo...

MARCOSLING 28/01/2010 16:19:07
#333054
Tenho dois forms:

Form2:

Public Class Form2
Public v_parametro As String

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox(v_parametro)
End Sub
End Class

Form1:

Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Form2.gv_parametro = [Ô]TESTE[Ô]
Form2.ShowDialog()
End Sub
End Class

Você chama o Form1 e clica no botão chamando o Form2, e neste vc clica no botão para mostrar o valor do parâmetro
GONDYN 28/01/2010 19:39:52
#333067
Obrigado amigo pela ajuda, da maneira que vc me explicou deu certinho, porém o que está dando errado é que nesse seu exemplo o form2 irá abrir, no meu caso ele já está aberto, esperando receber o parametro, aí não funcionou...

Ao invés de:

Form2.gv_parametro = [Ô]TESTE[Ô]
Form2.ShowDialog()

tinha que ser algo como:

Form2.gv_parametro = [Ô]TESTE[Ô]
Me.Close
ASHKATCHUP 28/01/2010 19:51:16
#333069
Como assim [Ô]esperando o parâmetro[Ô]?
Você está executando uma rotina em outro form?
Por que não pode mudar o código para fazer como o Marcos falou?
GONDYN 28/01/2010 20:04:33
#333071
é o seguinte, tenho um Form1 (Child) aberto no qual clico em um botão que vai abrir outro Form2 (Normal) onde irei escolher uma informação. Quando eu fechar o Form2, a opção escolhida irá para um campo que está no Form1 (Child).

A maneira que o Marcos falou funcionaria se eu fosse abrir o Form1, mais como ele já está aberto não tá dando certo.

Espero que tenho conseguido explicar o que quero.

Obrigado a todos que estão tentando me ajudar...
ASHKATCHUP 28/01/2010 20:20:22
#333072
Digamos que no Form 1 você tenha um label e no form 2 um textbox


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Form1.Label1.Text = TextBox1.Text
Close()
End Sub
GONDYN 28/01/2010 21:10:41
#333078
Obrigado a todos que me ajudaram, conseguir resolver e postarei o código:

CType(Form1.ActiveMdiChild, Form2).TextBox1.Text = [Ô]Hello[Ô]
Tópico encerrado , respostas não são mais permitidas