Public Class Form1
 
If Form2 geöffnet Then
   Form2.Tag = Schlüssel
   Form2.DatenLesen()
Else
   Dim x As New Form AdressenDetails
   x.Tag = Schlüssel
   x.show()
End If
 
End Class
 
 
Public Class Form2
 
Private Sub Load
DatenLesen()
End Sub
 
Public Sub DatenLesen()
' Es werden die unterschiedlichsten Aufgaben erledigt
Daten lesen von Datenbank
Databinding
 
End Sub
End Class