Private Sub MyForm_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Messagebox.Show(me.Designmode)
        If Not Me.DesignMode Then
            Dim sys As New cDataBase.System_mdb
 
            Dim dt As oRRoSoft.Data.DataTable = sys.Get_Form_Size(Me.Name)
 
            If dt.HasRows Then
                Dim b() As Byte = dt.Rows(0)("Win_MemoryStream")
                Dim ms As New MemoryStream(b)
                Dim binFormatter As New BinaryFormatter
 
                m_Form_Size = CType(binFormatter.Deserialize(ms), Form_Size)
                Me.Location = m_Form_Size.Location
                Me.Size = m_Form_Size.Size
                Me.WindowState = m_Form_Size.WindowState
            End If
        End If
    End Sub

Methode nicht gefunden: oRRoSoft.Data.DataTable System_mdb.Get_Form_Size( _
  System.String).