Dim Table As DataTable = DirectCast(DataGridView1.DataSource, DataTable)
' この場合はDataTable型になります。 Dim Table As DataTable