Wpf dark title bar

' Note: This is supported on Windows 10 and higher

Imports System.Runtime.InteropServices
    
Class Example
    
	<DllImport("dwmapi.dll", PreserveSig:=True)>
	Public Shared Function DwmSetWindowAttribute(hwnd As IntPtr, attr As Integer, ByRef attrValue As Integer, attrSize As Integer) As Integer
	End Function
    
	' Use this line for WPF. Value of true makes the title bar dark, false is normal. Note that Me is the window you want to apply the dark title bar to
	InteropHelper.DwmSetWindowAttribute(New Interop.WindowInteropHelper(Me).Handle, 20, True, Runtime.InteropServices.Marshal.SizeOf(True))

    ' Use this line for Windows Forms. Value of true makes the title bar dark, false is normal. Note that Me is the form you want to apply the dark title bar to
	InteropHelper.DwmSetWindowAttribute(New Me.Handle, 20, True, Runtime.InteropServices.Marshal.SizeOf(True))

    
End Class

Similar codes

0 vote186 views1 answer
Excel vba formatconditions range
VBA
0 vote180 views1 answer
Vlookup columns not next to each other
VBA
0 vote172 views1 answer
How to set location and size of new from vb
VBA
0 vote190 views1 answer
Excel vba hide columns
VBA
0 vote180 views1 answer
Internet explorer reference vba
VBA
0 vote187 views1 answer
Vba first line of string
VBA
5 votes163 views1 answer
Vba array worksheet.index
VBA
0 vote186 views1 answer
Compare dates vb
VBA
0 vote183 views1 answer
How to format a textbox as date vb net
VBA
25 votes434 views3 answers
String to date vb
VBA