Forse ho capito:

Ti da errore perchè come stringa di comando non vuole una stringa generica ma la stringa CommandText della classe OleDBCommand (nel tuo caso).

codice:
Imports System.Data.OleDB
...
Dim MyCMD as OleDBCommand
Dim MyCNN as OleDBConnection

Class Form1
 
   Private Sub Form_Load ......
      'Apriti la connessione al tuo DB
   End Sub

   Private Sub Button1_Click ......
      MyCMD=NEW OleDBCommand("Drop Table " & Tabella &",MyCNN)
      MyCMD.ExecuteNonQuery
   End Sub   

End Class
Io ho provato così e mi funziona (solo che ho usato il NameSpace System.Data.SQLClient)

Ciao