Дата без знаков

[polpot]

Помогите пожалуйста!
В поле зписана дата к примеру 24,01,2011
Как преобразовать к виду 24012011 (без знаков)
Спасибо!
С Уважением!

[Alex A]

Посмотри эту форму. В поле 1 вводишь дату с календаря, потом щелкни по Полю 2.

[polpot]

Спасибо!
Не могу посмотреть. Формат файла.

[Alex A]

А я не могу перевести в А2003.. об этом и задавал вопрос, пока никто не ответил.
Но суть решения твоего вопроса такая.
Определяем длину текста в поле "дата". Обычно это 10.
В VBA крутим цикл от 1 до 10. Берем каждый символ даты. если это цифра - добавляем в текстовую переменную (в числовом виде просто сложится сумма цифр). По окончании цикла выводим то что получилось в новое поле. Могу прислать сюда макрос в текстовом виде, он не большой.

[polpot]

Благодарю!
Направление понял.
Огромное спасибо!!!!

[Alex A]

На скорую руку обработчик событий для ПОЛЕ2 у меня получился такой
Private Sub Поле2_Click()
L$ = ""
n = Len(Поле1)
For K = 1 To n
J$ = Mid$(Поле1, K, 1)
If J$ = "." Then L$ = L$ Else L$ = L$ + J$
Поле2 = L$
End Sub

[OlegVE]

Здравствуйте

SELECT Format(ПолеВашейДаты,"ddmmyyyy") AS ДатаБезЗнаков
FROM ТаблицаГдеПолеВашейДаты;

До свидания

[R Dmitry]

Здравствуйте, еще вариант

Public Function dat(dt As Date)
dat = Replace(CStr(dt), ".", "")
End Function