Question

VB2010或VB.NET 怎么能将自身窗体的所有内容保存为图片

（图片格式为JPG、PNG、bmp都可以）（保存到桌面），请给出代码，谢谢！
xjnzhidao 的方法可以用，但是保存图片后，上面的字迹不清晰，能否提供保存为高清的图片的代码。

Answer 1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        System.Windows.Forms.SendKeys.Send("%{PRTSC}")
        Delay(0.1)
        Dim bmp As Bitmap = CType(Clipboard.GetDataObject().GetData(DataFormats.Bitmap), Bitmap)
        bmp.Save("c:\test1.jpg", System.Drawing.Imaging.ImageFormat.Jpeg)
    End Sub

    Private Sub Delay(ByVal tim As Single)
        Dim t As Single = Microsoft.VisualBasic.Timer + tim
        While t > Microsoft.VisualBasic.Timer
            My.Application.DoEvents()
        End While
    End Sub

追问

本人为新手，能否帮助优化下代码，将图片保存为高清的，因为使用上面的代码，图片上的字迹不清晰