[vb 6] Passaggio di variabili tra 2 form

[stefano80super]

Salve qualcuno mi saprebbe spiegare (o dirmi dove guardare) per questo problema:
creo una variabile in un form, ho bisogno di passare il valore di questa variabile ad un altro form.
E' una cosa possibile? grazie per l'aiuto

[optime]

puoi dichiarare la variabile Public, cosi' e' automaticamente condivisa

[nat99]

2 vie identico risultato (a seconda dei casi ).

hai form1 e form2

crei in form2 una textbox e passi il valore da form1 a form2.

oppure

crei una variabile globale in un modulo bas, in tal modo quella variabile è visibile da tutti i form delle tue applicazioni...

[stefano80super]

thanks ora provo queste possibilit à

[Kylnas]

Non mi piace molto dichiarare una variabile globale.
O dichiari una variabile pubblica all'interno di Form1, come ti ha suggerito optime, o la dichiari privati ma definisci la proprietà Get per la variabile (sempre all'interno di Form1). In questo caso hai trasformato la variabile che ti serve in una proprietà a sola lettura che puoi utilizzare nelle altre form.

[Gymvideo2]

scusate se mi intrometto ma avrei anche io codesto problema:

come si dichiara una variabile pubblica?

[Kylnas]

Originariamente inviato da Gymvideo2
scusate se mi intrometto ma avrei anche io codesto problema:

come si dichiara una variabile pubblica?

Public nomevariabile as tipo

[codo82]

se non vuoi dichiarare variabili pubblice o globali puoi anche creare delle sub di scambio variabili del tipo:

'sulla Form2
Public Sub Scambio_variabili(var1, var2, var3, ecc)
LocalVar1=var1
LocalVar2=var2
LocalVar3=var3
    .
    .
End Sub

e richiamare la form2 così:

Form2.Scambio_variabili(var1, var2, var3, ecc)
Form2.Show

Forse non è un metodo molto ortodosso...ma se proprio uno non vuole variabili pubbliche o globali...

[zetaweb]

Scusate sto agli inizi di VB e non capisco bene.
Voglio passare una variabile da un form all'altro.
Nel form 1 ho messo:

Option Explicit
Public prova As String

Private Sub Command1_Click()
Form2.Visible = True
Form1.Visible = False
prova = "questa è la varibile"

End Sub

Nel form2 ho messo:

Private Sub Form_Load()

Text1.Text = prova
End Sub

Ma nella textbox non leggo il valore di prova.
Come devo fare?
Grazie!!!

[fiscet]

'''' FORM1 ''''

Option Explicit
Public prova As String

Private Sub Command1_Click()
Form2.Visible = True
Form1.Visible = False
prova = "questa è la varibile"

End Sub

'''' FORM2 ''''

Private Sub Form_Load()

Text1.Text = FORM1.prova
End Sub