Ayuda con imagen jpeg

[rositafresita]

hola a todos
Necesito saber como puedo guardar una imagen que coloco en un pictureBox a la cual le hago algunas marcas como líneas, pero lo que quiero es guardar la imagen con todo y las líneas que le dibujo. el formato de la imagen es jpg.
De antemano gracias a quien me pueda ayudar

[Mickel]

A ver si este codigo te sirve:
http://www.catenary.com/howto/jpeg2bmp.html

[luciano]

te paso una forma, pone un picture1 y un command1

Código:

Private Sub Command1_Click()
Dim x As IPictureDisp

Set x = Picture1.Image

'graba la imagen con todo, el picture y los dibujos con los metodos graf
SavePicture x, "c:\zzz.bmp"

Set x = Nothing
End Sub

Private Sub Form_Load()
With Picture1
.Picture = LoadPicture("c:\windows\plumas.bmp")
.AutoSize = True
.ScaleMode = 3
.DrawWidth = 5
.ForeColor = vbRed
.AutoRedraw = True
Picture1.Circle (.ScaleWidth / 2, .ScaleHeight / 2), .ScaleWidth / 4

End With

Command1.Caption = " grabar "

End Sub

saludos

[rositafresita]

Gracias a todos, su ayuda me ha sido muy útil.