[VB.Net] ricavare il valore di più select

[Brunchio]

Nell'impresa quasi impossibile di rifare un mio siterello in .net sto diventando scemo per le imprese più banali affrontabili con pochi secondi in asp..

allora.. avrei necessità di eseguire (credo) 6 query in una pagina per contare quanti record sono presenti in categorie diverse. Vorrei eseguire il metodo più veloce possibile con ovviamente l'impiego minimo di risorse, chi mi da una mano?


mi servono sei valori numerici, la query sarà sempre uguale, del tipo

Select * from miaTabella where categoria=1
Select * from miaTabella where categoria=2
Select * from miaTabella where categoria=3
Select * from miaTabella where categoria=4
Select * from miaTabella where categoria=5
Select * from miaTabella where categoria=6


ho tentato qualcosa come

        Dim Da As New Odbc.OdbcDataAdapter("SELECT * FROM miaTabella where categoria=1", conn)
        Da.Fill(ds)
        Dim conta1 As Integer = ds.Tables(0).Rows.Count
        Da.Dispose()
        ds.clear


        Dim Da2 As New Odbc.OdbcDataAdapter("SELECT * FROM miaTabella where categoria=2", conn)
        Da2.Fill(ds)
        Dim conta2 As Integer = ds.Tables(0).Rows.Count
        da2.dispose
        ds.clear

ecc.. ecc.. calcolando che i record sono abbastanza numerosi dubito sia una soluzione molto ottimizzata, chi mi sa consigliare?