Попробуйте так
Private Sub imgMonthView_Click()
Me.Date_postup.SetFocus
DoCmd.OpenForm "frmMonthView", , , , , acDialog ' Обращаю внимание на acDialog
Me!Date_ispolneniya = DateAdd("d", 58, Me!Date_postup)
End Sub
Кроме того, так как у Вас в поле Date_postup можно занести значение не только с помощью календарика, но и с клавиатуры, то добавьте
Private Sub Date_postup_AfterUpdate()
Me!Date_ispolneniya = DateAdd("d", 58, Me!Date_postup)
End Sub