[ahmed112001]

كود :

Public Class Form1
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Me.Style.TitleBar.BackColor = Color.Black
       Me.Style.TitleBar.ForeColor = Color.White
   End Sub
End Class