questo sarebbe parte del codice del form 1:

[supersaibal]
If txtID <> "" Then
ricerca = "ID"
parametro = CLng(txtID.Text)
Unload Me
sfoglia.Show
End If
[/supersaibal]

e questo è il form 2:
[supersaibal]
Private Sub Form_Load()
For i = 0 To 3
cmdRec(i).Enabled = True
Next
If ricerca = "ID" Then
Call ric_id
ElseIf ricerca = "CAT" Then
Call ric_cat
ElseIf ricerca = "TIPO" Then
Call ric_tipo
Else
Call ric_tutti
End If
End Sub
[/supersaibal]

e poi in uno dei sottoprogrammi:

[supersaibal]
If rec.EOF And rec.BOF Then
Unload Me
risposta = 1
MsgBox "Nessuno script trovato!", vbInformation, "Errore"
sfoglia_ID.Show
[/supersaibal]

il form1 scrive 2 variabili pubbliche e poi richiama il form2...
il form2 legge le variabili fa dei controlli e se non vanno a buon fine rimanda al form1...


grazie dell'aiuto...