qadeer37
Well-known member
Option Strict Off
Public Class Form1
Private Sub CapTureScreenShot(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
SendKeys.Send("{%}({PRTSC})")
Me.Show()
'code for saving this file to hard drive.
PictureBox1.Image = CType(My.Computer.Clipboard.GetImage, Image)
Me.WindowState = FormWindowState.Normal
End Sub
End Class
Public Class Form1
Private Sub CapTureScreenShot(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
SendKeys.Send("{%}({PRTSC})")
Me.Show()
'code for saving this file to hard drive.
PictureBox1.Image = CType(My.Computer.Clipboard.GetImage, Image)
Me.WindowState = FormWindowState.Normal
End Sub
End Class