[سعود]

هل تعني تصوير الفورم؟

---

على كل حال الكود التالي حسب فهمي من السؤال

كود :

Button1.Visible = False

        For Each ctr In Me.Controls
            If TypeOf ctr Is CheckBox Then
                If ctr.checked = False Then
                    ctr.Visible = False
                End If
            End If
        Next
        Dim b As New Bitmap(Me.Width, Me.Height)

        Me.DrawToBitmap(b, New Rectangle(0, 0, Me.Width, Me.Height))

        b.Save(Application.StartupPath & "\Form.bmp")

        'To save to a JPEG or another format include this argument:

        b.Save(Application.StartupPath & "\Form.jpeg", Imaging.ImageFormat.Jpeg)
        Button1.Visible = True

طبعا التنسيق صورة عادي واظن نفس الشي للبي دي اف