自定义控件--xp风格按钮(可设置文字颜色)
Imports System.Drawing
Imports System.ComponentModel
Public Class winxpbutton
Inherits System.Windows.Forms.Button
Private my_mouseDown As Boolean = False 鼠标按下
Private my_mouseHover As Boolean = False 鼠标移到上面
Private m_textcolor As Color = System.Drawing.Color.Black 字体颜色
<Description("字体颜色。")> _
Public Property textcolor() As Color
Get
Return m_textcolor
End Get
Set(ByVal Value As Color)
m_textcolor = Value
Me.Invalidate()