[Kamil]

و عليكم السلام

PHP كود :

Imports System.Drawing
Imports System.Windows.Forms

Module ThemeManager
    ' دالة لتغيير لون جميع عناصر التحكم
    Private Sub ChangeAllControlsColor(ByVal controls As Control.ControlCollection, ByVal color As Color)
        For Each control As Control In controls
            control.BackColor = color
            If control.HasChildren Then
                ChangeAllControlsColor(control.Controls, color)
            End If
        Next
    End Sub

    ' دالة لتغيير لون النموذج بالكامل
    Public Sub ApplyTheme(ByVal form As Form, ByVal color As Color)
        ChangeAllControlsColor(form.Controls, color)
    End Sub
End Module 


PHP كود :

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    ' تغيير اللون إلى الأزرق، يمكنك تغيير اللون حسب الحاجة
    ThemeManager.ApplyTheme(Me, Color.Blue)
End Sub