Даты в VB в читаемом виде.

@mic_i · Регистрация: 29.12.2009

Author24 — интернет-сервис помощи студентам

Кто знает, помогите решить проблему:

Прочитал поле даты из БД Access, оно вернулось как
double, как его представить теперь в читаемом виде?

29.12.2009, 10:05

Непонятная постановка вопроса.
Из какого Аксесса? как прочитал? чем? куда?

@mic_i · 29.12.2009, 10:11 **[ТС]**

После выполнения запроса в resultset дата хранится в виде xxxx.xxxx
в формате double. Какой функцией можно представить эту дату в привычном виде day/month/year

@pl · 29.12.2009, 10:19

CDate?

@mic_i · 29.12.2009, 10:28 **[ТС]**

Не получается

29.12.2009, 10:58

А почему читается как Double? Что, сразу в базе данных нельзя сделать его типа Date?

@palva · 29.12.2009, 15:15

Если ваше число Double - это число дней с начала 1900 года, как это принято при представлении даты в бейсике, то ваше число Double надо преобразовать сначала в дату, а затем в строку. Например, 100 * 365 - это приблизительно число дней, прошедшее с 1900 до 2000 года, поэтому следующий оператор напечатает примерно начало 2000 года.

MsgBox CStr(CDate(100# * 365))

У меня печатается 06.12.1999

Если у вас используется другое, нетрадиционное представление даты, то приведите хотя бы примеры типа: такое-то число соответствует такой-то дате.

@oldpasp · 29.12.2009, 16:23

Почему CDate не работает? Проверьте это:

Visual Basic    
        
    Скопировано
1
2
3
Dim dbl As Double
dbl = CDbl(Now())
MsgBox Format(CDate(dbl), "dd/mmmm/yyyy")

Если будет работать, значит возвращаемое значение не double, например вот это уже работать не будет:

Visual Basic    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
Dim dbl As Double
Dim strD As String
dbl = CDbl(Now())
strD = Replace(CStr(dbl), ",", ".")
MsgBox Format(strD, "dd/mmmm/yyyy")

А без replace - работает

@mic_i · 30.12.2009, 07:58 **[ТС]**

Спасибо за ответы, все заработало!

Новые блоги и статьи Все статьи Все блоги /
Вопросы на собеседовании по Android mobDevWorks 14.03.2025 По данным статистики, Android занимает более 70% мирового рынка мобильных операционных систем, что делает платформу привлекательной как для начинающих разработчиков, так и для опытных профессионалов. . . .	Лучшие игровые движки для Python py-thonny 14.03.2025 Python обеспечивает разработчиков игр мощными движками и фреймворками, которые позволяют воплотить практически любую идею — от простой аркады до визуального романа с разветвленным сюжетом. Главное. . .	Бессерверный JavaScript: Разработка масштабируемых API с AWS Lambda run.dev 14.03.2025 Но что такое бессерверные вычисления на самом деле? По сути, это модель облачных вычислений, где разработчик фокусируется исключительно на создании бизнес-логики, не тратя время на настройку. . .	Безопасность кода в C++26: Менеджеры ресурсов и висячие ссылки NullReferenced 14.03.2025 C++ всегда был языком, предоставляющим разработчикам большие возможности и гибкость, но вместе с тем требующим ответственности. Одной из самых коварных проблем даже для опытных программистов остаются. . .	smart-agent proper interface settings (2025) jigi33 14.03.2025 Smart-agent proper interface settings (mart 2025). (see screenshots to look at "Etalon" ARM)
Продвинутые настройки JVM Javaican 14.03.2025 Стандартные параметры запуска JVM хороши для повседневной разработки, но совершенно недостаточны для высоконагруженных систем. Представьте, что вы запускаете финансовую платформу, обрабатывающую. . .	CI/CD для приложений Java с Azure DevOps и Docker Mr. Docker 14.03.2025 Разработка современных Java-приложений немыслима без системы непрерывной интеграции и доставки (CI/ CD). Azure DevOps в сочетании с Docker предоставляет мощный инструментарий для создания таких. . .	Разработка на PHP и интернет вещей (IoT) Jason-Webb 14.03.2025 Интернет вещей (IoT) произвел настоящую революцию в способах взаимодействия устройств с окружающим миром. В эпоху, когда холодильники сами заказывают молоко, а термостаты учатся вашим привычкам,. . .	Node.js 20: Новые возможности и улучшения производительности Reangularity 14.03.2025 Что же принёс нам релиз Node. js 20? В первую очередь, это существенные улучшения в производительности. Движок V8 получил серьёзные оптимизации, благодаря чему JavaScript-код выполняется заметно. . .	Безопасность кластеров Apache Kafka Javaican 14.03.2025 Apache Kafka стал одним из ключевых компонентов современных архитектур, обрабатывающих потоки данных в режиме реального времени. Его используют тысячи компаний от стартапов до технологических. . .

@mic_i 0 / 0 / 0 Регистрация: 29.12.2009 Сообщений: 4
		1
	Даты в VB в читаемом виде. 29.12.2009, 09:51. Показов 1400. Ответов 8 Метки нет (Все метки) Кто знает, помогите решить проблему: Прочитал поле даты из БД Access, оно вернулось как double, как его представить теперь в читаемом виде? 0

Comanche
	29.12.2009, 10:05	2
	Непонятная постановка вопроса. Из какого Аксесса? как прочитал? чем? куда?

@mic_i 0 / 0 / 0 Регистрация: 29.12.2009 Сообщений: 4
	29.12.2009, 10:11 [ТС]	3
	После выполнения запроса в resultset дата хранится в виде xxxx.xxxx в формате double. Какой функцией можно представить эту дату в привычном виде day/month/year 0

@pl 51 / 17 / 6 Регистрация: 18.05.2007 Сообщений: 1,322
	29.12.2009, 10:19	4
	CDate? 0

@mic_i 0 / 0 / 0 Регистрация: 29.12.2009 Сообщений: 4
	29.12.2009, 10:28 [ТС]	5
	Не получается 0

Messir
	29.12.2009, 10:58	6
	А почему читается как Double? Что, сразу в базе данных нельзя сделать его типа Date?

@palva 4256 / 2952 / 688 Регистрация: 08.06.2007 Сообщений: 9,860 Записей в блоге: 4
	29.12.2009, 15:15	7
	Если ваше число Double - это число дней с начала 1900 года, как это принято при представлении даты в бейсике, то ваше число Double надо преобразовать сначала в дату, а затем в строку. Например, 100 * 365 - это приблизительно число дней, прошедшее с 1900 до 2000 года, поэтому следующий оператор напечатает примерно начало 2000 года. MsgBox CStr(CDate(100# * 365)) У меня печатается 06.12.1999 Если у вас используется другое, нетрадиционное представление даты, то приведите хотя бы примеры типа: такое-то число соответствует такой-то дате. 0

@mic_i 0 / 0 / 0 Регистрация: 29.12.2009 Сообщений: 4
	30.12.2009, 07:58 [ТС]	9
	Спасибо за ответы, все заработало! 0