VB流行颜色选择器

Question

我有一个关于 VB 事件处理程序和颜色选择器的问题。
现在我有一个标签，我希望当用户单击它时，它会弹出一个颜色选择器对话框，让用户更改标签的背景颜色。
不知道如何实现这一点，谁能给我一个方向？

谢谢

Answer 1

ColorDialog在您Label的单击处理程序中使用 .NET Framework 的类。

Private Sub Label1_Click(ByVal sender As Object, ByVal e As EventArgs) _
     Handles Label1.Click  

    Dim cDialog As New ColorDialog()
    cDialog.Color = Label1.BackColor ' initial selection is current color.

    If (cDialog.ShowDialog() = DialogResult.OK) Then
        Label1.BackColor = cDialog.Color ' update with user selected color.
   End If

End Sub