create a color from a string like &cFF007F

I want to set a color property of a graphics object from the string in a text field.
The string is meant to look like &cRRGGBB; like we are all use to seeing in the editor.
However, how do you convert the string into a color?

dim s as string = rgbTextField.Text dim c as color = color(s)

dim v As variant = rgbTextField.Text
dim c As color = v