Found the problem ...well fixed it, by changing:
Dim tb as New System.Drawing.Bitmap(iwid, iHt, PixelFormat.Format24BPPRGB)
to:
Dim tb as New System.Drawing.Bitmap(cInt(iwid), cInt(iHt), PixelFormat.Format24BPPRGB)
Go Figure :-P "Illegitimis non carborundum"
(don't let the b@st@rds...