C# / VB.NET - [VB.net] Creare queries a runtime utilizzando command e tableadapter insieme

Ciao a tutti, ho letto su internet del problema di creare queries a runtime utilizzando il tableadapter, il quale permetterebbe di crearle solo a designtime. Ho letto che si potrebbe ovviare a questo problema espandendo una classe, ma non ho approfondito.
Allora mi è sorto il dubbio che quanto ho fatto finora sia inelegante (benché funzioni). Io ho sempre sfruttato i benefici del tableadapter creando queries a runtime in questo modo:

Dim cmd As New OleDb.OleDbCommand("testoquery")
        Dim conn As New OleDb.OleDbConnection("stringa di connessione uguale a my.settings.nomestringaconnessione")

        cmd.Connection = conn

        Using conn
            conn.Open()
            cmd.ExecuteNonQuery()
        End Using

        AnniTableAdapter.Fill(tabella) 'stesso comando autogenerato nel Load

Cioè io combino l'utilizzo del tableadapter con quello del command, per poi riempire la tabella con il Fill del tableadapter... Sbaglio? In questo modo mi è possibile, però, utilizzare a tutti gli effetti delle query a runtime...

Grazie!