Available in the LEADTOOLS Imaging toolkit.
Posterize example for Visual Basic
This example applies a six-color poster effect and redisplays the image.
Lead1.Posterize 6 Lead1.ForceRepaint