รบกวนขอความรู้ VB.net สั่งพิมพ์ข้อความ หลายบรรทัดครับ

    Protected Sub btnPrintReport_Click(sender As Object, e As EventArgs) Handles btnPrintReport.Click

        Dim dtTmp As New DataTable() With {.TableName = "JimPriceReport"}

        dtTmp.Columns.Add("ItemsSeed", GetType(String))
        dtTmp.Columns.Add("Price", GetType(Double))

        dtTmp.Rows.Add(New Object() {"โรงน้ำชาป้าศรี/VIP", 1400})
        dtTmp.Rows.Add(New Object() {"ร้านกาแฟป้าเล็ก/ธรรมดา", 2500})
        dtTmp.Rows.Add(New Object() {"ขนุนหลงฤดู/ทั่วไป", 800})

        Dim dsTmp As New DataSet("dsTmp") 'Refer to your report
        dsTmp.Tables.Add(dtTmp)

        'ReportViewer Control

        Me.ReportViewer1.LocalReport.DataSources.Clear()
        Me.ReportViewer1.LocalReport.DataSources.Add(New ReportDataSource("dsTmp", dsTmp.Tables("JimPriceReport"))) 'Important it is case sensitive
        Me.ReportViewer1.LocalReport.ReportPath = ".\yourFolderReports\JimPrice.rdlc"

    End Sub