تغير الوان الأزرار

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim colors() As Integer = {&HFF, &H11FF}
ColorDialog1.CustomColors = colors
ColorDialog1.Color = Button1.BackColor
If ColorDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Button1.BackColor = ColorDialog1.Color
End If
If ColorDialog2.ShowDialog() = Windows.Forms.DialogResult.OK Then
Button1.ForeColor = ColorDialog2.Color
End If