Ho continuato a fare delle prove per cercare di mettere in pratica quanto “sostenuto” nell'esempio, ma senza risultati.
L'unica cosa che che ci assomiglia e funziona (funziona per modo di dire) rimane questa riportata, però non serve a nulla in quanto poi con una finestra invisibile e inservibile cosa ci fai.
Oppure sono io che proprio non riesco a capire cosa si vuol sostenere nel suggerimento?
Nella Main form:
Public Sub Form_Open()
Dim hFmn As FMain
Dim hFrm1 As Form1
Dim sPar1, sPar2 As String
hFmn = New FMain
sPar1 = "PIPPO"
sPar2 = "PLUTO"
hFrm1 = New Form1(sPar1, sPar2, hFmn)
End
Nella Form1:
Public Sub _new(sPar1 As String, sPar2 As String)
Print sPar1, sPar2
End