<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
 <dependency>
  <dependentAssembly>
   <assemblyIdentity
    type="win32"
    name="Microsoft.Windows.Common-Controls"
    version="6.0.0.0"
    processorArchitecture="X86"
    publicKeyToken="6595b64144ccf1df"
    language="*"
   />
  </dependentAssembly>
 </dependency>
</assembly>

    ' FlatStyle bei allen Steuerelementen des Formulars auf System ändern
    Public Sub SetFlatStyle(ByVal ctrls As Control.ControlCollection)
        Dim c As Control
 
        For Each c In ctrls
            If TypeOf c Is ButtonBase Then
                CType(c, ButtonBase).FlatStyle = FlatStyle.System
            ElseIf TypeOf c Is GroupBox Then
                CType(c, GroupBox).FlatStyle = FlatStyle.System
            End If
            SetFlatStyle(c.Controls)
        Next
    End Sub

If OSFeature.Feature.IsPresent(OSFeature.Themes) then
   ...
end if