Форум программистов, компьютерный форум, киберфорум
C# для начинающих
Форум программистов и сисадминов Киберфорум > Форум программистов > .NET > C# .NET > C# для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
Sharki
1

Как узнать что год високосный и сколько дней в месяце?

06.11.2010, 01:47. Показов 1566. Ответов 6
Метки нет (Все метки)
Author24 — интернет-сервис помощи студентам
Как узнать что год високосный и сколько дней в месяце(28,29,30,31)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 06.11.2010, 01:47
Ответы с готовыми решениями:

вывести к-во дней в месяце. Учесть високосный год или нет
Составить программу, которая в зависимости от порядкового номера месяца выводит на экран количество...

Вывести число дней в этом году, учитывая, что обычный год насчитывает 365 дней, а високосный — 366 дней
Дан номер некоторого года (положительное целое число). Вывести число дней в этом году, учитывая,...

Вывести число дней в заданном году, учитывая, что обычный год насчитывает 365 дней, а високосный — 366 дней
11 Дан номер некоторого года (положительное целое число). Вывести число дней в этом году, учитывая,...

Как узнать сколько дней в месяце, по дате без циклов?
Ктонибудь знает как узнать сколько дней в месяце, по дате без циклов. Например 10.2004 сколько в...

6
0 / 0 / 0
Регистрация: 10.09.2008
Сообщений: 18
06.11.2010, 02:50 2
Извини пожалуйста, но для начала неплохо бы научиться находить подобную информацию самостоятельно. Смотри свойства и функции DateTime в раскрывающемся списке редактора кода Visual Studio, или в Help, или в справочной системе на сайте Microsoft.
0
Sharki
06.11.2010, 13:07 3
Спасибо большое Katrin,но я же написал что я начинающий.У макрософт немного сложновато для меня,ты бы мне набросала по простому немного (for,if и Exeption ).Зарание большое спасибо
2 / 2 / 0
Регистрация: 30.05.2010
Сообщений: 70
06.11.2010, 13:55 4
Кликните здесь для просмотра всего текста
VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165

Module EasyDate
    '---------------------------------------------------------
    ' <summary>
    ' FirstDateOfWeek - возвращает последнюю дату недели
    ' </summary>
    ' <param name='vDate'>Дата, на которую запрашивается вычисляемое значение</param>
    ' <param name='vFirstDayOfWeek'>Опционально, первый день недели. По умолчанию берутся установки системы.</param>
    ' <value></value>
    ' <remarks>
    ' </remarks>
    ' <history>
    '   Vladimir Kvashenko  09/04/2004  Created
    ' </history>
    '------------------------------------------------- --------
    Public Overloads Function FirstDayOfWeek(ByVal vDate As Date, Optional ByVal vFirstDayOfWeek As FirstDayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.System) As Date
        FirstDayOfWeek = vDate.AddDays(-1 * Weekday(vDate, vFirstDayOfWeek)).AddDays(1)
    End Function
    '---------------------------------------------------------
    ' <summary>
    ' FirstDateOfWeek - возвращает последнюю дату недели
    ' </summary>
    ' <param name='ticks'>Дата и время, выраженное в 100-наносекундных единицах.</param>
    ' <param name='vFirstDayOfWeek'>Опционально, первый день недели. По умолчанию берутся установки системы.</param>
    ' <value></value>
    ' <remarks>
    ' </remarks>
    ' <history>
    '   Vladimir Kvashenko  09/04/2004  Created
    ' </history>
    '---------------------------------------------------------
    Public Overloads Function FirstDayOfWeek(ByVal ticks As Long, Optional ByVal vFirstDayOfWeek As FirstDayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.System) As Date
        Dim vDate As New Date(ticks)
 
        FirstDayOfWeek = vDate.AddDays(-1 * Weekday(vDate, vFirstDayOfWeek)).AddDays(1)
    End Function
    '---------------------------------------------------------
    ' <summary>
    ' FirstDayOfWeek - возвращает первую дату недели
    ' </summary>
    ' <param name='year'>Год</param>
    ' <param name='month'>Месяц</param>
    ' <param name='day'>День</param>
    ' <param name='vFirstDayOfWeek'>Опционально, первый день недели. По умолчанию берутся установки системы.</param>
    ' <value></value>
    ' <remarks>
    ' </remarks>
    ' <history>
    '   Vladimir Kvashenko  09/04/2004  Created
    ' </history>
    '---------------------------------------------------------
    Public Overloads Function FirstDayOfWeek(ByVal year As Integer, _
                                             ByVal month As Integer, _
                                             ByVal day As Integer, _
                                             Optional ByVal vFirstDayOfWeek As FirstDayOfWeek = Microsoft.VisualBasic.FirstDayOfWeek.System) As Date
        Dim vDate As New Date(year, month, day)
 
        FirstDayOfWeek = vDate.AddDays(-1 * Weekday(vDate, vFirstDayOfWeek)).AddDays(1)
    End Function
    '---------------------------------------------------------
    ' <summary>
    ' LastDateOfWeek - возвращает первую дату недели
    ' </summary>
    ' <param name='vDate'>Дата, на которую запрашивается вычисляемое значение</param>
    ' <param name='vFirstDayOfWeek'>Опционально, первый день недели. По умолчанию берутся установки системы.</param>
    ' <value></value>
    ' <remarks>
        DayOfQuarter = DateSerial(vDate.Year, Int((vDate.Month - 1) / 3) * 3 + 1, 1)
    End Function
    '---------------------------------------------------------
    ' <summary>
    ' FirstDayOfQuarter - возвращает первую дату квартала указанной даты
    ' </summary>
    ' <param name='year'>Год</param>
    ' <param name='month'>Месяц</param>
    ' <param name='day'>День</param>
    ' <value></value>
    ' <remarks>
    ' </remarks>
    ' <history>
    '   Vladimir Kvashenko  09/04/2004  Created
    ' </history>
    '---------------------------------------------------------
    Public Overloads Function FirstDayOfQuarter(ByVal year As Integer, _
                                                ByVal month As Integer, _
                                                ByVal day As Integer) As Date
        Dim vDate As New Date(year, month, day)
 
        FirstDayOfQuarter = DateSerial(vDate.Year, Int((vDate.Month - 1) / 3) * 3 + 1, 1)
    End Function
    '---------------------------------------------------------
    ' <summary>
    ' LastDayOfQuarter - возвращает последнюю дату квартала указанной даты
    ' </summary>
    ' <param name='vDate'>Дата, на которую запрашивается вычисляемое значение</param>
    ' <value></value>
    ' <remarks>
    ' </remarks>
    ' <history>
    '   Vladimir Kvashenko  09/04/2004  Created
    ' </history>
    '---------------------------------------------------------
    Public Overloads Function LastDayOfQuarter(ByVal vDate As Date) As Date
        LastDayOfQuarter = DateSerial(vDate.Year, Int((vDate.Month - 1) / 3) * 3 + 4, 0)
    End Function
    '---------------------------------------------------------
    ' <summary>
    ' LastDayOfQuarter - возвращает последнюю дату квартала указанной даты
    ' </summary>
    ' <param name='ticks'>Дата и время, выраженное в 100-наносекундных единицах.</param>
    ' <value></value>
    ' <remarks>
    ' </remarks>
    ' <history>
    '   Vladimir Kvashenko  09/04/2004  Created
    ' </history>
    '---------------------------------------------------------
    Public Overloads Function LastDayOfQuarter(ByVal ticks As Long) As Date
        Dim vDate As New Date(ticks)
 
        LastDayOfQuarter = DateSerial(vDate.Year, Int((vDate.Month - 1) / 3) * 3 + 4, 0)
    End Function
    '---------------------------------------------------------
    ' <summary>
    ' LastDayOfQuarter - возвращает последнюю дату квартала указанной даты
    ' </summary>
    ' <param name='year'>Год</param>
    ' <param name='month'>Месяц</param>
    ' <param name='day'>День</param>
    ' <value></value>
    ' <remarks>
    ' </remarks>
    ' <history>
    '   Vladimir Kvashenko  09/04/2004  Created
    ' </history>
    '---------------------------------------------------------
    Public Overloads Function LastDayOfQuarter(ByVal year As Integer, _
                                               ByVal month As Integer, _
                                               ByVal day As Integer) As Date
        Dim vDate As New Date(year, month, day)
 
        LastDayOfQuarter = DateSerial(vDate.Year, Int((vDate.Month - 1) / 3) * 3 + 4, 0)
    End Function
    '---------------------------------------------------------
    ' <summary>
    ' FirstDateOfMonth - возвращает первую дату указанного месяца
    ' </summary>
    ' <param name='vDate'   ;
    ' <param name='year'>Год</param>
    ' <param name='month'>Месяц</param>
    ' <param name='day'>День</param>
    ' <value></value>
    ' <remarks>
    ' </remarks>
    ' <history>
    '   Vladimir Kvashenko  09/04/2004  Created
    ' </history>
    '---------------------------------------------------------
    Public Overloads Function LastDateOfMonth(ByVal year As Integer, _
                                              ByVal month As Integer, _
                                              ByVal day As Integer) As Date
        Dim vDate As New Date(year, month, day)
 
        LastDateOfMonth = DateSerial(vDate.Year, vDate.Month, System.DateTime.DaysInMonth(vDate.Year, vDate.Month))
    End Function
End Module
0
Sharki
06.11.2010, 14:33 5
Ну нечевосебе по простому,а можно тоже самое только на 'C#' и попроще.Большое прибольшое спасибо
2 / 2 / 0
Регистрация: 30.05.2010
Сообщений: 70
06.11.2010, 23:54 6
Ну а что тут сложного?
Ты испугался коментариев?
Убери их. Я их специально не удалял, чтобы было понятнее.

Что же тут не так, я тебе дал готовый класс.
Ну правда на VB.NET. Извени с C# не знаком. Да ты и не говорил, что на C# нужен. Ведь говорил то - 'ты бы мне набросала по простому немного (for,if и Exeption )'. Чем тебе не вариант. Ну не выходит так чтобы было только (for,if и Exeption ).

Когда я ищу что надо, то и C#-ным примером не брезгую. Нашел конвертилку и пытаюсь разбираться.

Ну уж напрягись. Направление то куда копать есть.
P.S. - На сколько я знаю люди которsе юзают С# c легкостью читают и понимают код VB.NET
0
85 / 61 / 69
Регистрация: 15.03.2007
Сообщений: 6,906
07.11.2010, 09:39 7
2 Sharki:
Смотрите методы класса System.Globalization.Calendar - IsLeapYear() и GetDaysInMonth
0
07.11.2010, 09:39
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
 07.11.2010, 09:39
Помогаю со студенческими работами здесь

Дан номер года (положительное целое число). Определить количество дней в этом году, учитывая, что обычный год насчитывает 365 дней, а високосный
Дан номер года (положительное целое число). Определить количество дней в этом году, учитывая, что...

Узнать сколько дней в месяце
Здравствуйте! Помогите пожалуйста с вопросом: В комбобокс в цикле ввёл месяцы. Надо при выборе...

Вывести количество дней между двумя датами (как учитывать високосный год?)
Пользователь вводит две даты (день, месяц, год в виде целых чисел). Необходимо определить и...

Как узнать число дней в месяце?
самый простой способ, как? возможно, есть функция или ряд функций, возможно ли?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru