以文本方式查看主题 - 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格式导出来。 |
-- 作者:有点蓝 -- 发布时间: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 -- 谢谢,可以了。 |