Dim bytes(outStream.Length) As Byte
outStream.Read(bytes, 0, CType(outStream.Length, Integer))Dim sReturnReport As String = Me.Page.Request.QueryString("ReturnReport")
If (Not sReturnReport Is Nothing) Then
If (Not sReturnReport.Trim() = String.Empty) Then
Me.Page.Response.Buffer = True
               Dim rpt As ActiveReport = Nothing                Try
                    rpt = New NwindLabels()
                    rpt.Run(False)
                Catch eRunReport As Exception
                    Me.Trace.Warn("Report failed to run:\n" + eRunReport.ToString())
                End Try
Dim outStream As MemoryStream = New MemoryStream()
rpt.Document.Sava(outStream,DataDynamics.ActiveReports.Document.RdfFormat.AR20)                  outStream.Seek(0, SeekOrigin.Begin)
                Dim bytes(outStream.Length) As Byte
                outStream.Read(bytes, 0, CType(outStream.Length, Integer))
               Me.Page.Response.ClearContent()
                Me.Page.Response.ClearHeaders()
                Me.Page.Response.BinaryWrite(bytes)
                               Me.Page.Response.End()
其中Dim bytes(outStream.Length) As Byte
outStream.Read(bytes, 0, CType(outStream.Length, Integer))
这两行代码不知如何编写成C#

解决方案 »

  1.   

    Byte[] bytes = new byte(outStream.Length);outStream.Read(bytes, 0, (Integer)outStream.Length);
      

  2.   

    告诉你一个网址,也是在CSDN知道的,可以把
    VBz.NET转换为C#,楼主不用自己转换了,哈哈
    http://www.developerfusion.com/utilities/convertvbtocsharp.aspx
    老外就是牛B
      

  3.   

    Byte[] bytes = new byte(outStream.Length);outStream.Read(bytes, 0, (Integer)outStream.Length);String sReturnReport= this.Page.Request.QueryString("ReturnReport");
    If  sReturnReport !=“”
    {
       IF sReturnReport.Trim() = String.Empty
            {
                 .................
        }}