XtraReport报表刷新问题

[bibite51520]

以下是源代码，第一次点击按钮，展示报表数据正常。但是再点击按钮，数据变化后，报表中显示还是第一次的不刷新。
求解，怎么破？

Dim Myreport = New Mod_MatbarCode()

Myreport.Report_MatName.Text = A_txt_MatName.Text
Myreport.Report_BarCode.Text = A_txt_MatID.Text
Myreport.Report_MatType.Text = A_txt_MatType.Text

Dim printControl1 = New PrintControl()
printControl1.PrintingSystem = Myreport.PrintingSystem

Dim PrintBarManager = New PrintBarManager()
PrintBarManager.Form = printControl1
PrintBarManager.Initialize(printControl1)
PrintBarManager.MainMenu.Visible = False
PrintBarManager.AllowCustomization = False
printControl1.PrintingSystem.SetCommandVisibility(PrintingSystemCommand.Print, DevExpress.XtraPrinting.CommandVisibility.Toolbar)


Myreport.CreateDocument()



GC_MatBarcode.Controls.Add(printControl1)
printControl1.Dock = DockStyle.Fill