Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Последнее значение, как значение по-умолчанию / 4 сообщений из 4, страница 1 из 1
23.09.2004, 14:23:13
    #32708524
Junior_N
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Последнее значение, как значение по-умолчанию
Так вот господа профессионалы...
почитал я вчера firststeps.ru/vba...пробовал-пробовал ничего не получается
Какие варианты я пробовал (только сразу не ругайте!)
1) [Маршрут].defaultvalue = [Маршрут].AfterUpDate - не работает...
2) x1 = [Маршрут].AfterUpDate
[Маршрут].defaultvalue = x1 - тоже не очень работает...

Зато следующее работает! Только выдает постоянно 123...123...
[Маршрут].defaultvalue = "123"

Только не ругайте пожалуйста НАЧИНАЮЩЕГО эксессовца!
Я вложил свой тестовый файлик, если вам не трудно подскажите как все-таки решить эту проблему.

ВСЕМ ЗАРАНЕЕ БЛАГОДАРЕН
...
Рейтинг: 0 / 0
23.09.2004, 16:21:35
    #32708938
Geo
Geo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Последнее значение, как значение по-умолчанию
Это?
...
Рейтинг: 0 / 0
23.09.2004, 20:58:42
    #32709422
Iskander68
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Последнее значение, как значение по-умолчанию
а может типа:

Private Sub Price_AfterUpdate()
Me.Price.Tag = Me.Price.Value
Me.Price.DefaultValue = Me.Price.Tag
End Sub

?
...
Рейтинг: 0 / 0
23.09.2004, 21:01:26
    #32709424
Iskander68
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Последнее значение, как значение по-умолчанию
Блин, глупость какую сморозил. Уж проще было

Private Sub Price_AfterUpdate()
Me.Price.DefaultValue = Me.Price.Value
End Sub

:-)
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Последнее значение, как значение по-умолчанию / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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