Meter varias tablas en el DataSet

[juagarc4]

Hola, que tal,
No hace falta que crees un DataAdapter parta cada una.
Puedes probar Puedes hacerlo de la siguiente forma:

Por ejemplo, tomando la Base de Datos Northwind que viene con el SQLSERVER

Código:

Dim conString as string= "server=localhost;database=Northwind;uid=sa;pwd=;"
  
Dim sqlStmt  as string= "SELECT * FROM Customers; SELECT * FROM Orders"
     
      SqlDataAdapter sda = new SqlDataAdapter(sqlStmt, conString);
Dim  ds as DataSet = new DataSet();

      sda.Fill(ds);
      ds.Tables[0].TableName = "Customers";
      ds.Tables[1].TableName = "Orders";

Y luego si quieres mostrarlas en Dos datgrids, seria así:

Código:

        Datagrid1.DataMember = "CUSTOMERS"
        Datagrid1.DataSource = ds.Tables("CUSTOMERS")
        Datagrid1.DataBind()
        DataGrid2.DataMember = "ORDERS"
        DataGrid2.DataSource = ds.Tables("ORDERS")
        DataGrid2.DataBind()