Ciao,
avrei questo problema, ho cercato soluzioni un po' ovunque ma non sono riuscito a inserirle nel mio Vb.net, in più era un po' che non utilizzavo il mio programmino.
Dunque ho una tabella (Allenatori) con : Allenatore,nome, Dunque nome è il nome reale, allenatore è un nome fittizio un'altra tabella (Associazione) dove ho Allenatore,squadra(è la squadra gestita) .

Ora mi serve sapere: 1° Quanti nomi esistono, 2°quanti allenatori, 3° quante squadre esistono e quante con allenatori diversi .
Avevo pensato

indipendentemente dalla correttezza, come posso estrarle?

SQL =SQL = "SELECT Count(Allenatori) as Qa,Count(nomi) as Qn FROM Allenatori UNION ALL SELECT count(Squadre) as Qs, count(Distinct allenatori) as Qsa FROM Associazione"
cn.ConnectionString = QualeDb
cn.Open()
Dim cmd As New OleDbCommand(SQL, cn)
Dim ds As OleDbDataReader = cmd.
ds.read
ds.Item("qa")
ds.Item("qn")
ds.Item("qs")
ds.Item("qsa")
ds.Close()
cn.Close()
Ovviamente va in errore tentando di aprire il DS. Un passo alla volta spero di arrivare alla conclusione