AlphaBlend example for Visual Basic

   LEAD2.Bitmap = LEAD1.Bitmap
   LEAD2.IntensityDetect 150, 250
   LEAD1.AlphaBlend 0, 0, LEAD1.BitmapWidth, LEAD1.BitmapHeight, LEAD2.Bitmap, 0, 0, 128