コモンダイヤログを使ってフォームに書いてある絵を保存するには?


ぽん  2004-02-07 22:25:28  No: 111710

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


魔界の仮面弁士  2004-02-08 11:27:16  No: 111711

Print#ステートメントではなく、SavePictureを使いましょう。


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




  


  このエントリーをはてなブックマークに追加