[VB.Net] Screencapture in 6 lines 03-30-2011, 09:19 AM
#1
Code:
Dim rect As New Rectangle(Point.Empty, Screen.PrimaryScreen.Bounds.Size) 'Creating a rectangle of Screen's Size
Dim bmp As New Bitmap(Screen.PrimaryScreen.Bounds.Width, Screen.PrimaryScreen.Bounds.Height) 'Creating a Bitmap of Screen's Size
Dim g As Graphics = Graphics.FromImage(bmp) 'Creating Graphics from the Bitmap
g.CopyFromScreen(Point.Empty, Point.Empty, Screen.PrimaryScreen.Bounds.Size) 'Copying the Screen
pic.Image = bmp 'Using the bitmap in our PictureBox
g.Dispose() 'Disposing our GraphicsYou can use this to create a RemoteDesktop app, Magnifier, Screen Capture application, and many more.
![[Image: rytwG00.png]](http://i.imgur.com/rytwG00.png)
Redcat Revolution!





![[+]](https://sinister.li/images/modern/collapse_collapsed.png)

):