Available in the LEADTOOLS Imaging toolkit.
AddNoise example for Access 2.0
This example adds red noise and redisplays the bitmap.
Me![LEAD1].Object.AddNoise 500, CHANNEL_RED Me![LEAD1].Object.ForceRepaint