Public Class start
 
    Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" ( _
      ByVal hWnd As IntPtr, ByVal nIndex As Integer) As Integer
    Private Declare Function SetWIndowLong Lib "user32" Alias "GetWindowLongA" ( _
    ByVal hWnd As IntPtr, ByVal nIndex As Integer) As Integer
 
 
    Private Sub start_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
 
        Const GWL_STYLE = (-16)
        Const WS_CAPTION = &HC00000
 
        ' Fensterstil ändern
        Dim nStyle As Long
 
        With Me
            ' aktuellen Fensterstil emitteln
            nStyle = GetWindowLong([u].hwnd, GWL_STYLE)
 
 
            ' Titelleiste entfernen
            nStyle = nStyle And Not WS_CAPTION
 
 
            ' Neuen Fensterstil setzen
            SetWIndowLong[u](.hwnd, GWL_STYLE, nStyle)
 
        End With
 
    End Sub
End Class

Es ist n?tig das Eure Antworten verst?ndlich und nachvollziehbar sind. (Umgebung: Visual Studio Proff.2010, WPF, XAML, Visual Basic 10, Wind.7)