' Form1 ruft Form2 modal auf:
Load Form2
Form2.Show vbModal
 
' jetzt Auswahl auswerten
nIndex = Val(Form2.Tag)
If nIndex > 0 Then
  ' Anwender hat einen Auswahl ausgewählt
  ...
End if
Unload Form2

Private Sub cmdOK_Click()
  Me.Tag = ListView1.SelectedItem.Index
  Me.Hide
End Sub
 
Private Sub cmdAbort_Click()
  Me.Tag = 0
  Me.Hide
End Sub

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de