1 在工具箱添加 microsoft common dialog control 部件
2 用新增的commondialog工具在窗体上添加一个commondialog控件
3 接着代码如下,如此类推就可以了
Private Sub Form_Click()
c1.ShowColor
Form1.BackColor = c1.Color
End Sub
添加commondialog控件
然后
commondialog1.showcolor
是调用颜色窗口。至于背景或者文字颜色需要你用判断区分一下、
PS:直接要代码不是个好习惯,只是给你个思路,具体自己实践一下学的快,以上仅供参考