[ScreamVoice]

السلام عليكم ورحمة الله وبركاته

كنت عايز تعديل علي كود سكرين شوت بستخدمه وهو 

كود :

   Private Sub PictureBox2_Click(sender As Object, e As EventArgs) Handles PictureBox2.Click
       Try
           AxVLCPlugin21.video.fullscreen = True
           Threading.Thread.Sleep(1000)
           PictureBox12.Image = GetScreen()
           Threading.Thread.Sleep(1000)
           AxVLCPlugin21.video.fullscreen = False
       Catch ex As Exception
           MessageBox.Show(ex.Message, "get Desktop Image", MessageBoxButtons.OK, MessageBoxIcon.Error)
       End Try
       Try
           Dim SavePath As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop) & "\myDesktopImage.jpg"
           SavePath = NextAvailableFilename(SavePath)
           PictureBox12.Image.Save(SavePath, Imaging.ImageFormat.Jpeg)
       Catch ex As Exception
           MessageBox.Show(ex.Message, "Save Image", MessageBoxButtons.OK, MessageBoxIcon.Error)
       End Try
   End Sub

لما بضغط علشان ياخد شوت سكرين بيطلع بالشكل دا 


ممكن تعديل الكود يحيث الصوره تبقي فول سكرين طبيعيه 
وترجع تاني بعد الالتقاط
ولو الماوس يختفي من الصوره يبقي احسن
وشكرا