将richtextbox图像导出到png

Question

我们有一个应用程序，我们想要使用Windows剪切工具捕获屏幕截图，我们将其捕获在richtextbox中。我想导出图像并将其保存为png或jpeg文件夹。我使用了以下代码，但它只捕获可视屏幕。

Private Sub saveAsImage(ByVal box As RichTextBox, ByVal filename As String,  enter code here`ByVal format As Imaging.ImageFormat)
Dim rect As Rectangle = box.DisplayRectangle
Dim bmp As New Bitmap(rect.Width, rect.Height,  ixelFormat.Format32bppArgb)
Dim g As Graphics = Graphics.FromImage(bmp)
Dim p As Point g.CopyFromScreen(box.PointToScreen(p), p, New Size rect.Width, rect.Height))
g.Dispose()
bmp.Save(filename, format)
bmp.Dispose()
End Sub

我也可以使用word或pdf，但它只是来自剪切工具的图片没有文字。