作者kinggto (静静的蓝天)
看板Visual_Basic
标题[.NET] RGBToHLS API问题
时间Thu Dec 3 09:32:54 2009
最近在用一个RGB与HLS互转的程式
在网路上搜索到一个API的使用
但是却发生了一个问题
在VB 2005上不能跑(会出现Exception)
但是在VB6上面却可以跑
令我十分的纳闷
希望各位大大可以帮我测试一下或是解答一下
程式码如下:
Public Declare Sub ColorRGBToHLS Lib "shlwapi" (ByVal clrRGB As Int32, ByVal
pwHue As Int32, ByVal pwLuminance As Int32, ByVal pwSaturation As Int32)
Public Declare Function ColorHLSToRGB Lib "shlwapi" (ByVal pwHue As Long,
ByVal pwLuminance As Long, ByVal pwSaturation As Long) As Long
Dim H, L, S As Long
Dim iRGB As Long = RGB(120, 125, 125)
ColorRGBToHLS(iRGB, H, L, S)
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 114.33.237.97