Imports System.Windows.Forms
Imports MySql.Data.MySqlClient
Imports Microsoft.Reporting
Imports Microsoft.Reporting.WinForms
Public Class printstatus

    Private Sub printcardno_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ''TODO: This line of code loads data into the 'caragavotersdbDataSet.bccdetails' table. You can move, or remove it, as needed.
        'Me.bccdetailsTableAdapter.Fillbybccdetails(Me.caragavotersdbDataSet.bccdetails)
        ''TODO: This line of code loads data into the 'caragavotersdbDataSet.pccdetails' table. You can move, or remove it, as needed.
        'Me.pccdetailsTableAdapter.Fillpccdetails(Me.caragavotersdbDataSet.pccdetails)
        ''TODO: This line of code loads data into the 'caragavotersdbDataSet.hlldetails' table. You can move, or remove it, as needed.
        'Me.hlldetailsTableAdapter.Fillhhldetails(Me.caragavotersdbDataSet.hlldetails)

        ''TODO: This line of code loads data into the 'caragavotersdbDataSet.full_data_entry' table. You can move, or remove it, as needed.
        'Me.full_data_entryTableAdapter.Fill(Me.caragavotersdbDataSet.full_data_entry)
        'Me.ReportViewer1.RefreshReport()
    End Sub
    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
        If ComboBox2.Text = "RECRUITES" Then
            Me.full_data_entryTableAdapter.FillByStatus(Me.caragavotersdbDataSet.full_data_entry, ComboBox1.Text)
        ElseIf ComboBox2.Text = "HHL" Then
            Me.hlldetailsTableAdapter.FillByStatus(Me.caragavotersdbDataSet.hlldetails, ComboBox1.Text)
        ElseIf ComboBox2.Text = "PCC" Then
            Me.pccdetailsTableAdapter.FillByStatus(Me.caragavotersdbDataSet.pccdetails, ComboBox1.Text)
        ElseIf ComboBox2.Text = "BCC" Then
            Me.bccdetailsTableAdapter.FillByStatus(Me.caragavotersdbDataSet.bccdetails, ComboBox1.Text)
        End If
        Me.ReportViewer1.RefreshReport()
    End Sub
End Class