以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]颜色问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=75132)

--  作者:pcxjxjhkw
--  发布时间:2015/9/28 11:32:00
--  [求助]颜色问题

1.如何调用系统的颜色对话框?如下图

 
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150928113427.png
图片点击可在新窗口打开查看

 

2.如何根据颜色名称返回为颜色,如:

Dim cd As new system.windows.forms.colorDialog
If cd.ShowDialog = 1 Then
    msgbox(cd.Color.name)
End If

返回结果为字符串Red,如何根据字符串Red定义一个新的颜色

dim cr as color = ???



--  作者:大红袍
--  发布时间:2015/9/28 11:53:00
--  

1、无法调用。要么自己做 https://msdn.microsoft.com/zh-cn/library/vstudio/system.windows.systemcolors.aspx

 

2、保存数值,再还原

 

http://www.foxtable.com/help/topics/0496.htm

 

如果要用red,就用 Dim c As color = Color.FromName("red")


--  作者:pcxjxjhkw
--  发布时间:2015/9/28 11:57:00
--  
谢谢