主题：问个颜色的问题

颜色和字符串转换可以这样

Dim myColor As Color = Color.FromArgb(200,222,211,113)
'到文本
Dim converter As New ColorConverter
Dim colorAsString As String = converter.ConvertToString(myColor)
Output.show(colorAsString )
'到颜色
Dim co =ctype(converter.ConvertFromString(colorAsString),Color)
Output.show(co.a )