vb.net用printDialog打印textbox里的内容

[zjc507]

其中要对打印份数、起始页、结束页、打印最大页数和最小页数进行设定。以下是我编的，但是不知道有没有错，也没有指定打印的内容是textbox中的内容。有明白的能帮帮我吗？
Dim BeginPage, EndPage, NumCopies, i
Dim pd As System.Drawing.Printing.PrintDocument
pd = New System.Drawing.Printing.PrintDocument()
pd.PrinterSettings.MinimumPage = 1
pd.PrinterSettings.MaximumPage = 1000
BeginPage = pd.PrinterSettings.FromPage
EndPage = pd.PrinterSettings.ToPage
NumCopies = pd.PrinterSettings.Copies
PrintDialog1.Document = pd
If (PrintDialog1.ShowDialog() = Windows.Forms.DialogResult.OK) Then
For i = 1 To NumCopies
pd.Print()
Next i
Else
GoTo 6
End If
6:
End Sub

[VB.Net]

参看我的博客打印相关章节http://m.blog.csdn.net/uruseibest/article/details/73007519