Try this:
Put this at the top of the class file (form file, whatever)
Imports System.Drawing
Imports System.Drawing.Imaging
And this where you want to save it
Dim img as Bitmap = new Bitmap( Me.Width, Me.Height )
Dim g as Graphics = Graphics.FromImage( img )
g.CopyFromScreen( new Point(...