0

VB.NETでのプログラミングには、もう1つの小さな問題があります。TextBoxを使用してtxtファイルから入力されたを持っていますStreamReader。基本的に私には印刷オプションがありますが、に表示されているものしか印刷できません。スクロールする必要TextBoxのある情報がTextBoxさらに下にある場合、これは印刷されません（それが理にかなっていることを願っています！）。すべての情報が印刷されるようにこれを回避する方法はありますか？

これが私のコードです：

Imports System.Drawing.Printing

Public Class JobList
    Private Sub JobList_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim objReader As New System.IO.StreamReader("C:\test\JobLog.txt", True)
        txtJL.Text = objReader.ReadToEnd
        objReader.Close()
    End Sub

    Private Sub printText(ByVal sender As System.Object, ByVal ev As PrintPageEventArgs)
        Dim font As New Font("Arial", 16, FontStyle.Regular)
        ev.Graphics.DrawString(txtJL.Text, font, Brushes.Black, 100, 100)
    End Sub

    Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrint.Click
        Dim printDoc As New PrintDocument
        AddHandler printDoc.PrintPage, AddressOf Me.printText
        printDoc.Print()
    End Sub
End Class
4

1 に答える 1

0

StreamReaderMSDNから印刷するには、下にスクロールします - 例があります。から印刷するには、わずかな変更が必要な場合があります。Stringその後、それに渡すことができますTextBox.Text。または、そのまま使用してから印刷するだけで、StreamReaderとにかく同じ結果が得られるはずです。

于 2012-10-21T20:34:44.867 に答える