'InFrame
                    inFrame = mainFrame.OLEFormat.Object.Controls.Add( _
                      "Forms.Frame.1", "inFrame1", True)
                    With inFrame
                        .Top = 0
                        .Height = mainFrame.Height
                        .Width = mainFrame.Width
                        .Left = 0
                        .Visible = True
                    End With
 
                    ' Browser wird angezeigt, aber wie legt man nun die 
                    ' Eigenschaften fest
                    inFrame.Controls.Add("Shell.Explorer.2")
 
 
                    'Alternative Objekt erstellen
 
                    Dim wb As WebBrowser
 
                    wb = inFrame.Controls.Add("Forms.WebBrowser", "wb1", True)