VBの印刷について
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にしてます。
なぜピクチャーボックス内のコントロールが認識されないのでしょうか?
各コントロールは正常に動作しています。
お礼
1050YENさん 参考になりました。ありがとうございました。