求教 如文字vbred颜色，在代码里该怎么转换，多谢！

求教 如文字vbred颜色，在代码里该如何转换，谢谢！！！
如有：
dim a as string="vbred"
Dim brush As Brush
brush=a '该如何转换，谢谢！！！

[解决办法]
Color.FromName试试
[解决办法]
Dim nBrush As New SolidBrush(Color.Blue)

Me.CreateGraphics.FillRectangle(nBrush, New Rectangle(10, 10, 10, 10))

nBrush = New SolidBrush(Color.FromArgb(255, 0, 0))

Me.CreateGraphics.FillRectangle(nBrush, New Rectangle(20, 20, 10, 10))

需要用纯色刷子，你用的是枚举刷子
[解决办法]
Color.FromKnowColor("red")