Windows颜色选择器（VB类代码）

代码说明：

这是一款打开windows颜色选择器的VB类代码，在VB编写过程中可方便引用，简化重复代码编写，引用示例如下： Sub Testfont()     Dim mfont As New FontPicker     mfont.SetFont     Debug.Print mfont.Name     Debug.Print mfont.Size     Debug.Print mfont.UnderLine     Debug.Print mfont.Color End Sub