Question

我尝试将datagridview（DGView7）中的所有列复制到报表查看器。

我使用了这段代码，但它没有用

  Dim myAL As New ArrayList()
    Dim row As List(Of String)
    For i As Integer = 0 To Basicfor.DGView7.RowCount() - 1
        row = New List(Of String)
        For j As Integer = 0 To Basicfor.DGView7.ColumnCount() - 1
            row.Add(Basicfor.DGView7.Rows(i).Cells(j).ToString)
        Next j
        myAL.Add(row)
    Next i

    Dim Params(0) As ReportParameter

    Params(0) = New ReportParameter("Ref", CType(myAL.ToArray(GetType(String)), String()))

    Me.ReportViewer1.RefreshReport()

显示错误。我试图更改为此代码字符串（） - ＆gt; Single（），但未定义单个

Params(0) = New ReportParameter("Ref", CType(myAL.ToArray(GetType(String)), Single()))

有人能解决这个问题吗？提前致谢

Answer 1

你正在打电话

Params(0) = New ReportParameter("Ref", CType(myAL.ToArray(GetType(String)), String()))

想要传入一个字符串数组（）。 这至少是我的假设

但是你传递了一系列字符串列表。

尝试

Dim myStrings = myAL.Cast(Of List(Of String)).SelectMany(Function(r) r).ToArray()

Datagridview使用参数VB.net报告查看器

1 个答案: