以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]列扩展为色彩型的颜色转换怎么转换为这种#FFFFFF格式导出来。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=125519)

--  作者:yjm789000
--  发布时间:2018/9/29 23:28:00
--  [求助]列扩展为色彩型的颜色转换怎么转换为这种#FFFFFF格式导出来。


图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20180929232340.png
图片点击可在新窗口打开查看
列扩展为色彩型的颜色转换怎么转换为这种#FFFFFF颜色格式导出来。

--  作者:有点蓝
--  发布时间:2018/9/30 9:48:00
--  
参考:

Dim clr As Color = Color.FromARGB(-16181)
Output.Show("A:" & clr.A)
Output.Show("B:" & clr.B)
Output.Show("G:" & clr.G)
Output.Show("R:" & clr.R)
Output.Show("#" & Format(clr.R,"X") & Format(clr.G,"X").PadLeft(2,"0") & Format(clr.B,"X").PadLeft(2,"0") )

--  作者:yjm789000
--  发布时间:2018/9/30 11:11:00
--  
谢谢,可以了。