Kép mentése 800x600-ba!

[jason]

Sziasztok!

Visual Basic 2010-ben szeretném ha csinálna a programom egy képet, és elmentené 800x600-ba!

Van egy kódom, esetleg ebben tudna valaki segíteni, hogy oldjam meg , hogy 800x600-ba mentse?:

Kód Kijelölés Kibont

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.Format32bppRgb)
        graph = Graphics.FromImage(screenshot)
        graph.CopyFromScreen(0, 0, 0, 0, bounds.Size, CopyPixelOperation.SourceCopy)
        screenshot.Save("D:\Kepek\1.bmp", Imaging.ImageFormat.Bmp)

[jason]

MEGOLDVA!!!