如何由QBColor函数返回的RGB颜色码的值来得到RGB红绿蓝各分量的值~~? 如题~~VB,如何由QBColor函数返回的RGB颜色码的值来得到RGB红绿蓝各分量的值~~? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 QBColor....网上这个代码很多的是按位吧...你查查就有一堆出来 Public Sub GetRGB(Color As Long, Red As Long, Green As Long, Blue As Long) If Color <> 0 Then Red = Color And 255& Green = Color \ 256 And 255 Blue = Color \ 65536 End IfEnd Sub VB执行SQL语句耗时太久导致程序假死怎么办? 数据提供程序或其他服务返回 E_Fail 状态 的错误 vb连接FTP上传或下载FTP上的文件 急用!代码修改!导出excel 一个关于ListView的问题,急!! 如何判断向文本框中输入的内容没有引号 关于窗体的问题 神啊,救救我吧!这段程序真见鬼了!急死我了,在线等待! 急急急!如何兼容ACCESS驱动的问题 求助一个关于excel统计处理方面的特别问题!谢谢!! 怎样取得ACCESS结果集 高手請進:如何用vb實現Excel菜單/工具欄修改,及保存
网上这个代码很多的是按位吧...你查查就有一堆出来
If Color <> 0 Then
Red = Color And 255&
Green = Color \ 256 And 255
Blue = Color \ 65536
End If
End Sub