Из VB в базе Access-a создаю таблицу:

Set tdfNew = newDB.CreateTableDef(CurName)
With tdfNew
.Fields.Append .CreateField("id", dbLong)
.Fields.Append .CreateField("DOMAIN", dbText, 10)
.Fields.Append .CreateField("SHORT_NAME", dbText, 15)
.Fields.Append .CreateField("FULL_NAME", dbText, 50)
End With
newDB.TableDefs.Append tdfNew
newDB.TableDefs(CurName).Fields("ID").ValidationRule = ">=0" newDB.TableDefs(CurName).Fields("ID").ValidationText = "Значение ID должно быть неотрицательным"

Теперь захожу в Access, при открытии этой таблицы говорит: "Ошибка синтаксиса во введенном выражении" и мочит ValidationRule
ValidationText - все ОК, остается ...
их VBA этот кусок выполняется "на ура" ... HELP

.Fields.Append .CreateField("id", dbLong) - какой же это счетчик!!!

но потом я вешаю PrimaryIndex на него ...

Для чистоты эксперимента:
убрал создание индекса ... НЕ ПОМОГЛО

Смотрю после создания таблицы на поле ID - Type = 4 ... это Long

ё-моё!!!!! нашел ...

VB запихнул пробел после 0!!!! Хотя после создания показывал нормально, а при повторном подключении вижу, что там 4 символа и пробел последний!!!

... никак не удается избавиться от этого пробела :-(((

Ну так точно не пройдет ... ругается сам VB ... но смысл ясен
Нужно 3 кавычки с каждой стороны
Тоже самое. Вот что получилось:

ValidationRule "">=0"" String

Я пробовал Trim (...)

не покатило ... похоже Access после вставки сам правит зачем-то ...

Для этого примера можно сначала задать все свойства, а потом создать поле ...
но как поменять имеющеееся значение ... Это вопрос .......

ВОТ ТАК ПРОКАТИЛО: