VBレスキュー(花ちゃん) の Visual Basic 2010 用掲示板(VB.NET 掲示板)

タイトル： Re: テキストファイルを印刷する方法

投稿日： 2007/12/14(Fri) 17:33

投稿者： ゆうき

> WindowsXP VB.NETで釦を押したときにテキストファイルをそのまま印刷したいと考えています。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    PrintDocument1.Print()
End Sub

Private Sub PrintDocument1_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
    Dim g As Graphics = e.Graphics
    g.DrawString(TextBox1.Text, New Font("ＭＳＰゴシック", 12), Brushes.Black, 0, 0)
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    TextBox1.Clear()
    Dim stream As New System.IO.StreamReader("c:\hoge.txt", System.Text.Encoding.Default)
    TextBox1.Text = stream.ReadToEnd
    stream.Close()
End Sub

まあこんなところでしょう。フォントやテキストファイルなどは自由に設定します。

あとは、花ちゃんさんの言うとおりです。
わざわざこのホームページの掲示板に書き込むのであれば、
このホームページのサンプルぐらい見たらどうですか？
http://hanatyan.sakura.ne.jp/dotnet/PrintFle.htm

- 関連一覧ツリー （

をクリックするとツリー全体を一括表示します）

テキストファイルを印刷する方法

いと

No.6670

Re: テキストファイルを印刷する方法 - 花ちゃん 07/12/14-10:08 No.6671
Re: テキストファイルを印刷する方法 - ゆうき 07/12/14-17:33 No.6673

タイトル	： Re: テキストファイルを印刷する方法
投稿日	： 2007/12/14(Fri) 17:33
投稿者	：ゆうき

古いスレッドにレスはつけられません。