[VB6] Usare due Form

[Poker32]

Ciao,

vorrei realizzare un prog che all'avvio carichi il form principale e contemporaneamente un secondo form.

si può accedere al primo form solo se sul secondo form si clicca un bottone.

come si realizza?

Grazie

[allejo]

Baste che usi

nomeform.show e nomeform.hide

[Poker32]

non conosco "nomeform.hide"

il form1 carica il due
dal form2 non si può accedere al form1 e non si può chiudere il form2

quando clicco su un bottone si deve chiudere il form2
quest'ultima cosa non riesco a farla...

[Sonic88]

Allora se non ho capito male questo modo dovrebbe andare bene:
Sul Form1 nella Sub Form_Load Inserisci questo codice:

Me.Show
Form2.Show (1)

Nel form 2 dichiari una variabile OK di tipo Boolean (inserendo all'inizio Dim OK as Boolean)
Poi, sempre nel form2 nella Sub Form_Unload inserisci:

If OK <> True Then
    Cancel = 1
End If

Mentre come codice del tasto che deve chiudere il Form2 metti:

OK = True
Unload Me

[Poker32]

perfettooooo

grazie mille

così va benissimo

ciao

[Sonic88]

Prego!

[Poker32]

mi sono dimenticato una cosa...

nella prova che ho fatto riesco a passare dei valori dal form2 al form1 se scrivo dentro una textbox

come devo farese se voglio passare un valore di form2 a una variabile di form1?

[allejo]

supponiamo nel form2 c'è un pulsante(puls) e un text(text2)
e nel form1 c'è il text1
allora quando premi il pulsante fai così

sub puls_click()
form1.text1.text=text2.text
end sub

[Poker32]

così ci riuscivo,

devo passare il valore a una variabile...

[Sonic88]

Devi rendere la variabile del Form1 pubblica:
All'inizio del Form1 Dichiari la variabile così:

Public nomevar as String

Dopo di che dal form2 scrivi Form1.nomevar = "VALORE"