コモンダイヤログを使ってフォームに書いてある絵を保存するには？ (ID:111710)

名前

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

本文 Dim ファイル番号 As Integer CommonDialog1.Filter = "ビットマップファイル (*.bmp) | *.bmp" CommonDialog1.ShowSave ファイル番号 = FreeFile Open CommonDialog1.FileName For Output As #ファイル番号 Print #ファイル番号, Form1.image Close #ファイル番号 と書いているんですがどうすればいいのでしょうか？ あと、できればコモンダイヤログを使って ピクチャボックスに書いてある絵を、保存する方法も教えてください。 お願いします！