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