MitchelScrubz

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        mdTableAdapter.Fill(Me.DatabaseDataSet.MemberDetails)
        dgViewFiller("MemberDetails")
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        rtTableAdapter.Fill(Me.DatabaseDataSet.RunningTimes)
        dgViewFiller("RunningTimes")
    End Sub

    Private Sub dgViewFiller(ByVal tableName As String)
        BindingSource.DataSource = DatabaseDataSet
        BindingSource.DataMember = tableName
        dgView.DataSource = BindingSource
    End Sub
End Class