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

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

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

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

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

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

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

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


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