Dovresti usare la preposizione Alter Table, tipo:
... ... ...
OggCom.CommandText = "ALTER TABLE TABELLA2000 ALTER CAMPO1 Text(250)"
OggCom.Execute