ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / VBA, задать формат поля при создании таблицы?
13 сообщений из 13, страница 1 из 1
VBA, задать формат поля при создании таблицы?
    #32879747
О.Сергей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
О.Сергей
Гость
Нужно задать числовой формат с фиксированным количеством десятичных знаков. Что указать вместо dbLong

Set MyTable = CurrentDb.CreateTableDef("NewTb")
MyTable.Fields.Append MyTable.CreateField("NewID", dbLong)
...
Рейтинг: 0 / 0
24.01.2005, 12:32:33
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32879805
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Рискну предположить, что dbDecimal

А что, кнопка Ф1 у вас не работает?
...
Рейтинг: 0 / 0
24.01.2005, 12:47:12
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32879901
О.Сергей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
О.Сергей
Гость
Имеется ввиду задать формат представления данных в поле - например: Тип данных: Денежный, формат поля: фиксированный, число десятичных знаков: 2
А по Ф1 ничего нет на эту тему.
...
Рейтинг: 0 / 0
24.01.2005, 13:16:43
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32879947
Фотография Программист-Любитель
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программист-Любитель
Участник
У объекта Fied свойство Format или подобного я не нашел. Но это все есть у поля формы.
...
Рейтинг: 0 / 0
24.01.2005, 13:31:17
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32879982
О.Сергей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
О.Сергей
Гость
Программист-ЛюбительУ объекта Fied свойство Format или подобного я не нашел. Но это все есть у поля формы.
И как теперь дальше жить будем!?
...
Рейтинг: 0 / 0
24.01.2005, 13:43:04
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32880038
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
T1- таблица
P1- поле
зонд
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Dim mydb As DAO.Database
Dim mytable As DAO.TableDef
Dim myf As DAO.Field
Dim mypr As DAO.Property
Set mydb = CurrentDb
Set mytable = mydb.TableDefs("T1")
Set myf = mytable.Fields("P1")
On Error Resume Next
    For Each mypr In myf.Properties
    Debug.Print mypr.Name; "-->"; mypr.Value
    Next mypr
реакция:
Format-->Fixed
DecimalPlaces--> 2
семейство:
Код: plaintext
1.
myf.Properties("DecimalPlaces") =  11  ' новое значение числа десятичных знаков
...
Рейтинг: 0 / 0
24.01.2005, 14:01:19
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32880073
ЛП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ЛП
Участник
О.СергейИмеется ввиду задать формат представления данных в поле
Интересно, а зачем вам формат представления задавать в таблице?
Наверное это болезнь такая заразная - пользователю данные показывать напрямую в таблицах. Второй топик за сегодня.
Вообще-то данные рекомендуется отображать с помощью формочек/отчетиков. Соответственно там и форматы настраивать.
...
Рейтинг: 0 / 0
24.01.2005, 14:10:51
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32880101
Alexey Sh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexey Sh
Участник
2 ЛП: при создании форм форматы можно наследовать из таблицы, что есть хорошо
...
Рейтинг: 0 / 0
24.01.2005, 14:17:37
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32880167
Alexey Sh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexey Sh
Участник
Наконец проявился звериный лик CurrentDB
Код: plaintext
1.
Dim t As DAO.TableDef
Set t = CurrentDb.TableDefs("Table1")

t - инвалид, однако
...
Рейтинг: 0 / 0
24.01.2005, 14:34:15
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32880169
ЛП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ЛП
Участник
Alexey ShНаконец проявился звериный лик CurrentDB
Код: plaintext
1.
Dim t As DAO.TableDef
Set t = CurrentDb.TableDefs("Table1")

t - инвалид, однако
давно известный глюк DAO
TableDefs сохрани в отдельную переменную
и держи ее, пока с отдельными TableDef работаешь
...
Рейтинг: 0 / 0
24.01.2005, 14:36:17
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32880175
О.Сергей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
О.Сергей
Гость
Shuhard у - Спасибо все отлично!
А ситуация в том., что требуется создавать большое кол-во таблиц, а на их основе предполагается создавать формы, а поля формы как известно наследуют форматы полей своих таблиц.
...
Рейтинг: 0 / 0
24.01.2005, 14:37:17
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32880247
Alexey Sh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexey Sh
Участник
2 ЛП : я вообще-то Currentdb вызываю только один раз(не нравится мне что аксесс с ней вытворяет внутрях , клонирует не по делу
...
Рейтинг: 0 / 0
24.01.2005, 14:58:56
| Ответить | Цитировать | Написать  
VBA, задать формат поля при создании таблицы?
    #32880281
ЛП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ЛП
Участник
Alexey Sh2 ЛП : я вообще-то Currentdb вызываю только один раз(не нравится мне что аксесс с ней вытворяет внутрях , клонирует не по делу
Не вопрос. Кажется, сохранение CurrentDB тоже решает проблему с тем, что DAO ссылку теряет куда-то.
...
Рейтинг: 0 / 0
24.01.2005, 15:07:05
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / VBA, задать формат поля при создании таблицы?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32880167&tid=1669102]:
 0ms
get settings:
 8ms
get forum list:
 17ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 53ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 61ms
get tp. blocked users:
 1ms
others: 235ms
total:  395ms
созд. / загр.: 395ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]