How do you save a picture with the hDC of a Picturebox? I've blitted to it, and now I want to save it. Any thoughts?

(I also have GetPixel and SetPixelV declared)
Code:
Sub BlitAndSave{}
Dim I
Dim J

   setpixelv picture1.hdc,4,2,rgb(0,76,174)
   savepicture picture1.picture, app.path & "\test.bmp"
End Sub
What am I doing wrong??????