Passare testo ad un altro form

[giandelv]

Ragà non riesco a risolvere un problema abbastanza semplice!

Nel Form 1 ci sono i pulsanti:
Ciao, Hello, Passa
e una textbox: Tex1
Nel Form 2 c'è il pulsante: Indietro
e la textbox: Text2

Se premo Ciao e poi Passa, nella text box: Text2 del Form2 compare ciao
Poi premo indietro per tornare al form1
A questo punto se premo Hello e poi, Passa, nella text box: Text2 del Form2
compare sempre Ciao e io invece vorrei che comparisse "Hello". :master:

Questo è l'errore che ho fatto:

Form1
------------------------------
Private Sub Command1_Click()
Text1.Text = "Ciao"
End Sub

Private Sub Command2_Click()
Text1.Text = "Hello"
End Sub

Private Sub Command3_Click()

Load Form2
Form2.Show
Form1.Visible = False

End Sub
-----------------------

Form2:
-----------------------
Private Sub Command3_Click()

Load Form1
Form1.Show
Form1.Visible = True
Form2.Visible = False

End Sub

Private Sub Form_Load()
Dim nu As String

nu = Form1.Text1.Text
Text2.Text = nu

End Sub
------------------------
Come posso fare?

[Sypher]

Il problema è che tu valorizzi la textbox nel form_load(parlo del form2) e il form_load lo fa solo all'inizio quando lo carica la prima volta quindi la textbox non viene rivalorizzata ma mantiene il vecchio valore poichè tu il form2 lo hai solo nascosto!

[iguana13]

Form1.show

Equivale a:

Load form1
form1.show
form1.visible=true

[rodorigo]

Metti Così

Quando clicchi ciao:

[Nome della form2].[nome della textbox su frm2].text = "Ciao"

Quando clicchi Hello

[Nome della form2].[nome della textbox su frm2].text = "Hello"

e quando premi passa solo

[Nome della form2].Show
---- Se vuoi nascondere form1 --
[Nome del form1].Hide
------------------------------



e per far chiudere la form 2
Me.hide
--- Se vuoi far rivedere form 1 ----
[Nome del form1].Show
-----------------------------------------