Функции DatePart - Microsoft Office Excel

valerij · 03.04.2013, 22:33

Цитата:

В этом примере для указанной даты с помощью функции DatePart отображается квартал года, в котором находится эта дата.

Здесь
И код не работает, что в нём не так?
ввожу - 3/3/2013 (пробовал по всякому)

Код:

Dim FirstDate, Msg As String   'Declare variables.
Dim SecondDate As Date
FirstDate = InputBox("Enter a date:")
SecondDate = CDate(FirstDate)
Msg = "Quarter: " & DatePart(DateInterval.Quarter, SecondDate)
MsgBox(Msg)

Казанский · 03.04.2013, 23:09

"Здесь" - это Visual Studio 2008, другая разновидность языка.

Код:

Msg = "Quarter: " & DatePart("q", SecondDate)

valerij · 03.04.2013, 23:34

Цитата:

Сообщение от Казанский

"Здесь" - это Visual Studio 2008

Всё ОК.

Спасибо.

03.04.2013, 23:09	#2
Казанский Старожил Регистрация: 31.12.2010 Сообщений: 2,133	"Здесь" - это Visual Studio 2008, другая разновидность языка. Код: `Msg = "Quarter: " & DatePart("q", SecondDate)` exceleved@yandex.ru Яндекс.Деньги: 410011500007619

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Использование подпрограммы-функции: Вычислить значение функции (Турбо паскаль)	RealUnited	Паскаль, Turbo Pascal, PascalABC.NET	1	05.12.2012 20:34
Построение графика функции, мигание(затухание) шарика в минимумах функции	kas1m_rus	Паскаль, Turbo Pascal, PascalABC.NET	0	27.05.2012 20:28
Как подменить адрес возврата функции func на адрес функции f используя переполнение буфера buf и функции gets	dmitrii6120	Помощь студентам	6	14.11.2011 20:10
Программа на СИ++, используя функции работы с файлами и функции <string.h>	Аня Popova	Фриланс	9	13.09.2010 15:52
datepart в sql	DS75	БД в Delphi	9	02.05.2009 18:23