Function RGBtoACI(r As Long, g As Long, b As Long) Dim color As New AcadAcCmColor Call color.SetRGB(r, g, b) RGBtoACI = color.ColorIndex End Function Sub test() Debug.Print RGBtoACI(63, 127, 111) End Sub
Thursday, November 17, 2005
Code snippet to convert RGB to ACI
Here is a VBA function for AutoCAD that converts RGB values to ACI.

Translate into Français | Deutsch | Italiano | Português | Español | 日本 | 한국의 | 中國

Subscribe to:
Post Comments (Atom)
Some of the latest blog posts
Contact Us
| About JTB World |
Subscribe to this blog
JTB World's website |
Website General Terms of Use |
Privacy Policy
^ Top of page
© 2004- JTB World. All rights reserved.
No comments:
Post a Comment