Devexpress 生成Xtrareport

我想以适当的格式在Xtrareport中生成动态表

所以我使用这个代码

   dynamicTable.Borders = DevExpress.XtraPrinting.BorderSide.All

        dynamicTable.BorderWidth = 1

但它并没有像我所希望的那样提供适当的输出

它是通过逐行分隔每个单元格来生成表的，所以它不会给出表的外观

完整代码：

 Dim label As New XRLabel()
    label.Width = 500
    label.Font = New System.Drawing.Font("Verdana", 10.0F, FontStyle.Bold)
    PageHeader1.Controls.Add(label)

    If rowsCount > 0 Then
        Dim padding As Integer = 5
        Dim tableWidth As Integer = Me.PageWidth - Me.Margins.Left - Me.Margins.Right - padding * 2

        Dim dynamicTable As XRTable = XRTable.CreateTable(New Rectangle(padding, 1, tableWidth, 40), 1, 0) ' table column count

        dynamicTable.Width = tableWidth
        dynamicTable.Rows.FirstRow.Width = tableWidth
        dynamicTable.Borders = DevExpress.XtraPrinting.BorderSide.All
        'dynamicTable.Borders = DirectCast(((DevExpress.XtraPrinting.BorderSide.Left Or DevExpress.XtraPrinting.BorderSide.Top) Or DevExpress.XtraPrinting.BorderSide.Right) Or DevExpress.XtraPrinting.BorderSide.Bottom, DevExpress.XtraPrinting.BorderSide)
        dynamicTable.BorderWidth = 1
        Dim i As Integer = 0
        dynamicTable.BeginInit()
        For Each dc As DataColumn In ds.Tables(0).Columns

            Dim cell As New XRTableCell()

            Dim binding As New XRBinding("Text", ds, ds.Tables(0).Columns(i).ColumnName)
            cell.DataBindings.Add(binding)
            cell.CanGrow = False
            cell.CanShrink = True
            cell.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleCenter
            'cell.WidthF = 10 
            'cell.Width = 20
            cell.Text = dc.ColumnName
            dynamicTable.Rows.FirstRow.Cells.Add(cell)



            i += 1

        Next dc


        dynamicTable.Font = New System.Drawing.Font("Verdana", 8.0F)
        dynamicTable.AdjustSize()
        dynamicTable.EndInit()
        Detail.Controls.Add(dynamicTable)
        'label.Text = String.Format("Data table: {0}", Test)

        Me.DataSource = ds
        Me.DataMember = Test

---

您报告的布局是什么？您希望如何放置此动态表？？？你的问题没有完整的信息说明你尝试了什么，你到底在做什么？？？如果可能，为此类布局问题附加一些快照。您能否提供更多相关代码，说明如何创建表格及其样式？？