06-10-12, 10:34 PM
هنا أظهرنا زر المساعدة
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
' هنا سنظهر زر المساعدة
ColorDialog1.ShowHelp = True
If ColorDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Me.BackColor = ColorDialog1.Color
End If
End Sub