Ler varias tabelas

Olá pessoal

Estou iciciando o uso do MySql e já apareceu a primeira duvida

Abaixo segue uma procedure escrita em vb.net para ler uma tabela, o problema é que só consigo abrir uma consulta por vez.

Obs. No access eu consigo deixar varias consultas aberta.

Public Sub LerTabelas()

Dim conexao As MySqlConnection = New MySqlConnection
Dim comando As MySqlCommand = New MySqlCommand
Dim adapter As MySqlDataAdapter = New MySqlDataAdapter
Dim tabela As DataTable = New DataTable

conexao.ConnectionString = "SERVER=localhost; USER ID = root; password = sim ; database = venda"

 consulta = "Select * From estoque"

 conexao.Open()

 comando.Connection = conexao

 comando.CommandText = consulta

 adapter.SelectCommand = comando

 Dim LeitorEstoque As MySqlDataReader = comando.ExecuteReader

 'Até este ponto tudo bem, posso ler os dados da tabela estoque utilizando o LeitorEstoque

 'No entanto se eu fizer uma consulta a outra tabela cadastro de clientes por exmplo.
 'eu preciso fechar o LeitorEstoque, veja abaixo a minha tentativa de ler a tabela cadastro de clientes

 consulta = "Select * From cadastro"

 comando.CommandText = consulta

 adapter.SelectCommand = comando

 Dim LeitorCadastro As MySqlDataReader = comando.ExecuteReader

 End Sub

Bom, eu gostaria de saber se existe alguma maneira de eu manter mais de uma consulta aberta.