Andrew1
1

Изменение свойств поля таблицы в VBA

20.06.2006, 20:41. Показов 7695. Ответов 2
Метки нет (Все метки)

Подскажите пожалуйста. Столкнулся с такой проблемой: необходимо програмно изменить имя поля таблицы и затем установить необходимое количество знаков после запятой для этого поля. для реализации использую следующий код.
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
  Dim fld As DAO.field
  Dim prop As DAO.Property
  Dim td As TableDef
 
  Set td = dbMyDB1.TableDefs("Таблица1")
  td.Fields("Поле0").Name = "Поле1"
 
  Set fld = td.Fields("Поле1") 
  Set prop = fld.CreateProperty("Format", dbText, "Standard")
  fld.Properties.Append prop
  Set prop = fld.Properties("Format")
  prop.Value = "Standard"
  Set prop = fld.CreateProperty("DecimalPlaces", dbByte, 2)
  fld.Properties.Append prop
  Set prop = fld.Properties("DecimalPlaces")
  prop.Value = 2
  
  fld.Properties.Refresh
Проблема заключается в том, что если отдельно выполнить часть кода которая соответствует установке количества знаков после запятой, то все работает нормально. Но если, как в приведеном коде, сначала изменить имя, а потом устанавливать свойства, то свойства не устанавливаются. При этом сообщение об ошибке не выдается. Подскажите в чем ошибка.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.06.2006, 20:41
Ответы с готовыми решениями:

Изменение формата поля таблицы в VBA
Подскажите пожалуйста как в VBA можно изменить формат поля таблицы. Таблица после импорта через...

Добавление кнопки "Обзор" // Изменение свойств поля,изменение значения по 2му шелчку
Доброго времени суток! Есть форма для будущего заполнения пустой базы данных для учета...

Программное изменение свойств полей таблицы
Здравствуйте! Подскажите пожалуйста, как в ALTER TABLE в таблице изменить значение по умолчанию...

Изменение поля посредством VBA
Такая проблема. Нужно при нажатии на форме кнопки изменить данные в таблице. Из таблицы...

2
6 / 6 / 1
Регистрация: 06.12.2006
Сообщений: 329
20.06.2006, 23:14 2
Попробуй после переименования поля
Visual Basic
1
  td.Fields("Поле0").Name = "Поле1"
по-новой выполнить
Visual Basic
1
2
  Set dbMyDB1 = ... ' Не знаю, что здесь у тебя находиться
  Set td = dbMyDB1.TableDefs("Таблица1")
0
Andrew1
21.06.2006, 13:39 3
Спасибо, все работает
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.06.2006, 13:39
Помогаю со студенческими работами здесь

Использование имени поля таблицы с пробелом в VBA
Форумчане, доброго времени суток! Прошу подсказать каким образом можно записать кодом VBA имя...

VBA выделить элемент списка и передать поля таблицы
Всем доброго времени суток! Столкнулся с такой проблемой, в Форме создал список с таблицами, при...

Изменение значения ключевого поля таблицы
Форумчане, доброго времени суток! Пользователь ошибочно ввел в ключевое поле типа счетчик ...

Изменение таблицы в форме в зависимости от состояния поля со списком Access 2007
Доброго времени суток. Подскажите, как изменить содержимое получаемое формой из таблицы в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru