or u can use SQL ...

VB Code:
  1. SQL = "ALTER TABLE Table1 ADD COLUMN ID COUNTER"
  2. cnn.Execute SQL