C# と VB.NET の質問掲示板

お世話になります。
Visualstudio2019　VBで開発を行っています。
CaptureFormでフォームのイメージを取得し、フォーム印刷を行っているのですが、
文字がボケるというか、曲線が滑らかに描画されない状態です。
一度ピクチャーボックスで文字を描画したもので出力を試みたのですが、結果は変わらずでした。
解像度を-4(高)に設定したりなどしたのですが、状況は変わらないです。
何とか解消する方法や、何かしら有効な手段などは有りませんでしょうか？

よろしくお願いします。

■No94470 (魔界の仮面弁士 さん) に返信
> ■No94469 (まる さん) に返信
>>CaptureFormでフォームのイメージを取得し、フォーム印刷を行っているのですが、
> 
> ここでいう CaptureForm とは何でしょうか?
> 自作クラスでしょうか、それとも何かのライブラリでしょうか。
> 
> Visual Basic Power Packs の PrintForm クラスとも違いそうですし…。
> https://docs.microsoft.com/ja-jp/previous-versions/bb882742%28v%3dvs.140%29

大変失礼しました。
他の人が作ったものでした

    Public Function CaptureForm(ByVal ctrl As Control) As Bitmap
        Dim img As New Bitmap(ctrl.Width, ctrl.Height)
        Dim memg As Graphics = Graphics.FromImage(img)
        Dim dc As IntPtr = memg.GetHdc()
        PrintWindow(ctrl.Handle, dc, 0)
        memg.ReleaseHdc(dc)
        memg.Dispose()
        Return img
    End Function

上記でフォームイメージを取得し、取得したイメージを印刷している状態です。