ник: Анатолий (Киев)
Вы ничего не напутали?
Me.NPerehoda.DefaultValue = CByte(vmarg(1)) - вы присваиваете значение по умолчанию, т.е. указываете значение, которое появится в поле, если начать новую запись. А вы, как раз, ничего не создаете.
Кроме того, изменение DefaultValue на событии Current новой записи не будет иметь эффекта для этой записи, ИМХО.