ник: Анатолий (Киев)
если пишу 09.11 то получаю ноябрь 2009, а надо сентябрь 2011
|
Потому, что Акс думает, что вы ввели день и месяц, и подставляет год. Получаем 09.11.09
Если вы введете 09.13, то Акс решит, что введен месяц и день. Получим 13.09.09
Если введете 13.13, то он вообще ругнется.
Я бы так не делал. Но если сильно хочется, попробуйте так:
Private Sub Дата_AfterUpdate()
Dim v
v = Me.ActiveControl.Text
If Not v Like "##.##" Then Exit Sub
Me.ActiveControl = "01." & v
End Sub
|