Vb.net ReportViewer滚动条问题

Vb.net ReportViewer滚动条问题,vb.net,forms,scrollbar,reportviewer,Vb.net,Forms,Scrollbar,Reportviewer,上述问题将在以下情况下发生:- 步骤1:打开报告表单 步骤2:生成报告并向右滚动 步骤3:关闭报表 步骤4:重新打开报表 正如您可以看到的,左侧的某些列丢失了,避免此问题的唯一方法是在关闭表单之前必须将其向左滚动,否则需要重新启动应用程序。垂直滚动条也会发生同样的情况,如果您关闭表单而不将其滚动回顶部,则在重新打开表单时会丢失一些行 *最大化或调整窗体大小也无法修复它 下面是报表编码 Imports MySql.Data.MySqlClient Imports Microsoft.Reporti

上述问题将在以下情况下发生:-

步骤1:打开报告表单

步骤2:生成报告并向右滚动

步骤3:关闭报表

步骤4:重新打开报表

正如您可以看到的,左侧的某些列丢失了,避免此问题的唯一方法是在关闭表单之前必须将其向左滚动,否则需要重新启动应用程序。垂直滚动条也会发生同样的情况,如果您关闭表单而不将其滚动回顶部,则在重新打开表单时会丢失一些行

*最大化或调整窗体大小也无法修复它

下面是报表编码

Imports MySql.Data.MySqlClient
Imports Microsoft.Reporting
Public Class Report
Private Sub Report_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Me.scr_report.RefreshReport()
End Sub

Private Sub dtp_from_ValueChanged(sender As Object, e As EventArgs) Handles dtp_from.ValueChanged, dtp_to.ValueChanged
    Dim currDTP As DateTimePicker = sender
    dtp_from.Checked = currDTP.Checked
    dtp_to.Checked = currDTP.Checked
End Sub

Private Sub btn_generate_Click(sender As Object, e As EventArgs) Handles btn_generate.Click
    Dim query As String = ""

    Select Case cb_report.Text
       Case "xxx"
       'some query
    End Select

    Dim cmd As New MySqlCommand(query, conn)
    Dim da As New MySqlDataAdapter(cmd)
    Dim ds As New DataSet1

    da.Fill(ds.Tables(0))

    scr_report.ProcessingMode = Microsoft.Reporting.WinForms.ProcessingMode.Local

    scr_report.LocalReport.DataSources.Clear()

    scr_report.LocalReport.DataSources.Add(New Microsoft.Reporting.WinForms.ReportDataSource("DataSet1", ds.Tables(0)))

    scr_report.RefreshReport()

    Me.Text = $"Report ({cb_report.Text})"
End Sub
End Class

知道如何解决这个问题吗?

在generate sub上的
RefreshReport()
之前,请尝试
scr\u report.Clear()
。@Jaxedin仍然不能