Определение дня недели, первого числа месяца - VB

Узнай цену своей работы

Формулировка задачи:

Я придумал как определять дни недели текущего месяца, но вот к примеру как определить день недели 1го июля 2012 или июня 2012...? Прям печалит, что казалось бы такие примитивные вещи не встроены в язык... Непонятно мне, что этим "практичным" ребятам мешало придумать функцию типа WeekDay(1,8,2012) или что то подобное... Прям словом нехорошим хочется их назвать...((( P.S. А может все проще, и я просто не знаю эту функцию?))

Решение задачи: «Определение дня недели, первого числа месяца»

textual
Листинг программы
Private Sub Command1_Click()
'Weekday(d,[fd]) - функция
'аргументы:
'd -дата(месяц, число, год)
'fd(необязатнльн) Константа, указывающая первый день недели.
' Если этот аргумент опущен, считается, что неделя начинается с воскресенья
'возвращаемое значение:--- номер дня недели для введенной даты
 
'номер дня недели d для даты "8,1,2012" /1 августа 2012/
'vbMonday --- считаем что неделя начинается с понедельника
d = Weekday("8,1,2012", vbMonday)
Print d
'в функцию Weekday в качестве аргументов надо передать
' дату "8,1,2012" или любую другую
'тогда эта функция Weekday возвратит номер дня недели для введенной даты
 
'аналогия
'в ф-цию Sin в кач аргумента передаем 5
'y = Sin(1) 'тогда ф-ция возвратит значение Sin(1)=0,8...
 
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 3.667 из 5
Похожие ответы