Добрый день!

Есть форма-календарик для ввода даты. Я убрала из этой формы всё лишнее, в том числе и заголовок.

Есть Функция которая возвращает календарную дату, выбранную с помощью формы. Текущей в форме становится дата, соответствующая аргументу CurrentDate, или текущая дата, если аргумент пропущен. В случае ошибки возвращает пустую строку:


Public Function SelectDay(Optional CurrentDate As Variant) As String
    On Error Resume Next
      SelectDay = ""
   If IsMissing(CurrentDate) Then CurrentDate = Date
     DoCmd.OpenForm "Kalendarik", , , , , acDialog, CurrentDate
     SelectDay = Form_Kalendarik.Tag
End Function


Проблема в том, что acDialog возвращает заголовок у моего календарика...
Как можно по-другому описать эту функцию, что бы заголовок календарика не восстанавливался? 

Спасибо,
с уважением
Александра 

Всем большое спасибо - всё получилось!
:-)

С уважением,
Александра