Foxtable(狐表)用户栏目专家坐堂 → [求助]列扩展为色彩型的颜色转换怎么转换为这种#FFFFFF格式导出来。


  共有2159人关注过本帖树形打印复制链接

主题:[求助]列扩展为色彩型的颜色转换怎么转换为这种#FFFFFF格式导出来。

帅哥哟,离线,有人找我吗?
yjm789000
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:136 积分:1717 威望:0 精华:0 注册:2016/7/18 20:17:00
[求助]列扩展为色彩型的颜色转换怎么转换为这种#FFFFFF格式导出来。  发帖心情 Post By:2018/9/29 23:28:00 [只看该作者]



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

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109736 积分:558396 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By: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
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:136 积分:1717 威望:0 精华:0 注册:2016/7/18 20:17:00
  发帖心情 Post By:2018/9/30 11:11:00 [只看该作者]

谢谢,可以了。

 回到顶部