Private Sub rdoShowAllJobs_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdoShowAllJobs.CheckedChanged
        '####################### Procedure Level Constants and Variables ###########################
        ' Dim dtDataRecoveryJobs As New DataTable
        ' Dim dtRepairJobs As New DataTable
        ' Dim dtSEOJobs As New DataTable
 
        Dim dtDataRecoveryJobs As New DataTable
        Dim dtRepairJobs As New DataTable
        Dim dtSEOJobs As New DataTable
        '###########################################################################################
 
        Try
 
            'CreateAllJobsDataTable(dtDataRecoveryJobs)
            'CreateAllJobsDataTable(dtRepairJobs)
 
            ' Resets the DataSet to it's original state, i.e. empty
            Me.dtAllJobsTable.Reset()
            Me.dtAllJobsTable.GetErrors()
 
            ' Select required columns from tblJobsDataRecovery
            Me.daCustomerJobs = New OleDbDataAdapter("SELECT DataRecoveryJobID, CustomerID, StaffID, DateCreated, TotalCost, Quote, Completed, DateCompleted FROM tblJobsDataRecovery", connOle)
            Me.daCustomerJobs.Fill(dtDataRecoveryJobs)
 
 
            ' Select required columns from tblJobsRepair
            Me.daCustomerJobs = New OleDbDataAdapter("SELECT RepairJobID, CustomerID, StaffID, DateCreated, TotalCost, Quote, Completed, DateCompleted FROM tblJobsRepair", connOle)
            Me.daCustomerJobs.Fill(dtRepairJobs)
 
            ' Select required columns from tblJobsSEO
            Me.daCustomerJobs = New OleDbDataAdapter("SELECT SEOJobID, CustomerID, StaffID, DateCreated, TotalCost, Quote, Completed, DateCompleted FROM tblJobsSEO", connOle)
            Me.daCustomerJobs.Fill(dtSEOJobs)
 
            Me.dtAllJobsTable.Merge(dtDataRecoveryJobs, True, MissingSchemaAction.Add)
            Me.dtAllJobsTable.Merge(dtRepairJobs, True, MissingSchemaAction.Add)
            Me.dtAllJobsTable.Merge(dtSEOJobs, True, MissingSchemaAction.Add)
 
            ' Set up DataView
            Me.dvCustomerJob = New DataView(Me.dtAllJobsTable)
            Me.dvCustomerJob.RowFilter = "CustomerID = '" & Me.txtCustomerID.Text & "'"
            Me.dvCustomerJob.Sort = "DateCreated"
 
            ' Set DataGrid datasource to DataView
            Me.dgOrders.DataSource = Me.dvCustomerJob
            Me.dgOrders.Refresh()
 
 
        Catch ex As Exception
            MessageBox.Show(ex.ToString(), "Error", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1)
            Console.WriteLine(ex.ToString())
        Finally
            SetDataGridProperties()
        End Try
    End Sub

Private Sub CreateAllJobsDataTable(ByVal aDataTable As DataTable)
 
        Dim dcID As DataColumn = New DataColumn("ID")
        dcID.DataType = System.Type.GetType("System.String")
        dcID.AllowDBNull = True
        dcID.Unique = False
        aDataTable.Columns.Add(dcID)
 
        Dim dcCustomerID As DataColumn = New DataColumn("CustID")
        dcCustomerID.DataType = System.Type.GetType("System.String")
        aDataTable.Columns.Add(dcCustomerID)
 
        Dim dcStaffID As DataColumn = New DataColumn("StfID")
        dcStaffID.DataType = System.Type.GetType("System.String")
        aDataTable.Columns.Add(dcStaffID)
 
        Dim dcDateCreated As DataColumn = New DataColumn("DateCreated")
        dcDateCreated.DataType = System.Type.GetType("System.DateTime")
        aDataTable.Columns.Add(dcDateCreated)
 
        Dim dcTotalCost As DataColumn = New DataColumn("TotalCost")
        dcTotalCost.DataType = System.Type.GetType("System.Double")
        aDataTable.Columns.Add(dcTotalCost)
 
        Dim dcQuote As DataColumn = New DataColumn("Quote")
        dcQuote.DataType = System.Type.GetType("System.Boolean")
        aDataTable.Columns.Add(dcQuote)
 
        Dim dcCompleted As DataColumn = New DataColumn("Completed")
        dcCompleted.DataType = System.Type.GetType("System.Boolean")
        aDataTable.Columns.Add(dcCompleted)
 
        Dim dcDateCompleted As DataColumn = New DataColumn("DateCompleted")
        dcDateCompleted.DataType = System.Type.GetType("System.DateTime")
        aDataTable.Columns.Add(dcDateCompleted)
 
    End Sub