Private Sub Form2_Load(ByVal sender As Object, ByVal e As System.EventArgs) _
  Handles Me.Load
  Me.Opacity = 0
  ' Form2 wird kurz aus dem Mdi-Formular gelöst:
  Me.MdiParent = Nothing
  ' ...und irgendwo ausserhalb verschoben
  Me.Location = New Point(300, -Me.Size.Height)
  ' um z.B. Steuerelemente zu zeichnen 
  Me.TextBox1.Text = "Das unsichtbare Formular"
End Sub

...
'Click
With Form2
 
   'Benutzer hat auf den Button für Form2 geklickt, 
   'das in der Zwischenzeit gefüllte Datenformular wird sichtbar gemacht:
 
   .MdiParent=frmMain 
   .Location = New Point(0,0)
   .Opacity = 100
End With
...