Public Class frmRelatorio

    Private Sub frmRelatorio_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'dsRelatorio.DataTable1' table. You can move, or remove it, as needed.
        Me.DataTable1TableAdapter.Fill(Me.dsRelatorio.DataTable1)
        Me.ReportViewer1.RefreshReport()
    End Sub
End Class