代码之家  ›  专栏  ›  技术社区  ›  user18

如何在VB.NET中使用数据表将行新对象添加到字符串(“C2”)中进行报告

  •  0
  • user18  · 技术社区  · 3 年前

    我的目标是将数据表中的货币列“MONTHLYSALARY”格式化为输出报告。只是我仍然想知道如何像下面的代码一样添加行新对象

    'sample code
                    dt.Rows.Add(New Object() { "<b>GROSS PAY</b>", payslip.Gross.ToString("C2") })
                    dt.Rows.Add(New Object() { "<b>TOTAL DEDUCTIONS</b>", payslip.Deductions.ToString("C2") })
    
    'the code I'm using
    Private Sub Generate()
            report.Clear()
            Dim dt As New DataTable()
            dt.Clear()
            dt.Columns.Add("ID")
            dt.Columns.Add("EMPID")
            dt.Columns.Add("NAME")
            dt.Columns.Add("MONTHLYSALARY")
            Dim query = "Select ID,EMPID,[NAME],MONTHLYSALARY From tblemployee"
            Using adapter As New OleDbDataAdapter(query, Con)
                adapter.Fill(dt)
            End Using
            report.AddDataTable(dt)
        End Sub
    
        Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
            Generate()
            report.ShowPrintPreviewDialog()
        End Sub
    
    0 回复  |  直到 3 年前