| |
|
|
| | Dim a As String
a = "03/10/1983"
Debug.Print CDate(a)
'выводит не соответствие типов 
это как ? | |
| |
| |
| |
|
|
| | а так?
Dim a As String
a = "03.10.1983"
Debug.Print CDate(a)
|
| |
| |
| |
| |
|
|
| | а вот так 
переставь год в начало строки,
и радуйся! | |
| |
| |
| |
|
|
| | чего тока не случается в коде... 
представляешь snipe  | |
| |
| |
| |
|
|
| | а чему удивляться - написано мурликанцами - а у них с датой проблемс | |
| |
| |
| |
|
|
| |
?Format("03/10/1983","\#dd\.mm\.yyyy\#")
#03.10.1983#
?Format("1983/10/03","\#dd\.mm\.yyyy\#")
#03.10.1983#
|
| |
| |
| |
| |
 11 Кб. |
|
| | А меня нет ошибок см.->
A2003  | |
| |
| |
| |
|
|
| | у тебя региональные установки правильные :)) | |
| |
| |
| |
|
|
| | Вот то то и оно - поди угадай какие там у клиента настройки будут.... | |
| |
| |
| |
|
|
| | вот то шо я написал - выравнивает ситуацию :) | |
| |
| |
| |
|
|
| | Эт точно
Чтобы не запоминать можно объявить
Public Const formatdata As String = "\#dd\.mm\.yyyy\#"
и пользоваться Debug.Print Format(a, formatdata) | |
| |
| |
| |
|
|
| | всё кушает? | |
| |
| |
|
|
