Available in the LEADTOOLS Imaging toolkit.
MotionBlur example for Visual Basic
LEAD1.MotionBlur 12, 4500, False
