[silverlight]

PHP كود :

       RichTextBox1.Refresh()
        Dim bmp As New Bitmap(RichTextBox1.Width, RichTextBox1.Height)
        Using g As Graphics = Graphics.FromImage(bmp)
            g.CopyFromScreen(RichTextBox1.PointToScreen(Point.Empty), Point.Empty, RichTextBox1.Size)
        End Using

        If Not bmp Is Nothing Then
            PictureBox1.Image = bmp
        End If