掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
折れ線グラフの幅を太くして印刷するには (ID：148244)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
印刷を次のようにすれば、折れ線を太く印刷することが出来ました。 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 'PrintDocumentオブジェクトの作成 Dim pd As New PrintDocument 'イベントハンドラの追加 AddHandler pd.PrintPage, AddressOf pd_PrintPage Dim ppd As New PrintPreviewDialog 'PrintDocumentを設定 ppd.Document = pd 'ダイアログを表示する ppd.ShowDialog() End Sub Private Sub pd_PrintPage(ByVal sender As Object, _ ByVal e As System.Drawing.Printing.PrintPageEventArgs) 'グラフをメモリにロード Dim MemStm As New MemoryStream() Chart1.SaveImage(MemStm, ImageFormat.Bmp) 'イメージオブェクにコピー Dim Img As Image = Image.FromStream(MemStm) e.Graphics.DrawImage(Img, e.MarginBounds) '次ページなし e.HasMorePages = False 'イメージオブジェクトを解放 Img.Dispose() End Sub 解決とさせていただきます。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.