ピクチャーボックスの内容印刷

---

visual basic6の印刷について質問です。
現在ピクチャーボックス内にテキストボックスやオプションボタンなどの
コントロールを配置しています。
入力等を行った後、その画面を印刷したいのですがうまくいきません。
各コントロールが認識されずに真っ白な状態で印刷されます。
以下のソースで各コントロールが認識されていないことがわかりました。

Private Sub print_cmd_Click()

print_mt = MsgBox("印刷しますか？", vbYesNo,)
If print_mt = vbYes Then
Picture2.Picture = Picture2.Image
SavePicture Picture2.Picture, App.Path & "\abc.bmp"
End If
End Sub

bmpで表示しようとしても何も確認できません。。。
Printer.PaintPicture Picture1.Image
Printer.EndDoc
でやっても白紙ででてきます。
AutoRedrowはTrueにしてます。
なぜピクチャーボックス内のコントロールが認識されないのでしょうか？ 
各コントロールは正常に動作しています。

---

http://www.gizshare.com/vbtomo/boards/vbqanda.php?do=leaf&num=12155

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。

※作成する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。