Problema al guardar imagenes...

[FedericoC]

Hola gente, tengo un problema y creo que ustedes me lo van a poder solucionar...
El problema es este:
Necesito guardar en ina imagen (.bmp), un formulario, osea, que incluya los picture box, label´s.etc. ¿Alguien sabe como puedo hacer?.
El otro problema es que yo no se cuantas imagenes/labels, va a haber en el formulario.
Muchas gracias...

[vbx3m]

Para guardar el formulario prueba con esto:

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const VK_SNAPSHOT = &H2C


Private Sub Command1_Click()
Clipboard.Clear
Call keybd_event(VK_SNAPSHOT, 1, 0, 0)
DoEvents
Picture1.Picture = Clipboard.GetData()
Command2.Enabled = True
End Sub

Private Sub Command2_Click()
With Commondialog1
.DialogTitle = "Guardar imagen"
.Filter = "Bitmap (*.bmp)|*.bmp"
.CancelError = True
.Flags = &H2
.ShowSave
SavePicture Picture1.Picture, .FileName
End With
End Sub

Me avisas que tal...