Строковый календарь в университет - Visual Basic .NET

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

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

Из строки, содержащей корректно заданную дату в формате "dd.mm.yy", где dd – день, mm – месяц, yy – год, получите строку с датой, отстоящей от заданной на n дней назад, в том же формате.

-Это собственно само задание которое мне досталось, здесь на форуме удалось найти рабочий код для практически такой же задачи, только в ней дни считались вперед, а мне нужно назад и у меня все никак не получается понять какие именно строчки нужно поменять, что бы все работало так, как нужно мне, помогите пожалуйста. Тема- строки, нельзя решать задачу другими способами. Найденный код:
Листинг программы
  1. Sub obrabotka(ByVal Str1 As String, ByVal n As Integer, ByRef Str2 As String)
  2. Dim month1, month, year, x, y, z As Integer
  3. x = CInt(Mid(Str1, 1, 2)) 'дни
  4. y = CInt(Mid(Str1, 4, 2)) 'месяцы
  5. z = CInt(Mid(Str1, 7)) 'года
  6. year = (x + n) \ 360 'изменение года
  7. month = (x + n) \ 30 'изменение месяца
  8. If x + n < 31 Then
  9. Str2 = CStr(x + n) & Mid(Str1, 3)
  10. Else
  11. month1 = month + y
  12. While month1 > 12
  13. month1 = month1 - 12
  14. End While
  15. Str2 = CStr(Format(x + n - month * 30, "00")) & "." & CStr(Format(month1, "00")) & "." & CStr(Format(z + year, "00"))
  16. End If
  17. End Sub

Решение задачи: «Строковый календарь в университет»

textual
Листинг программы
  1. Sub obrabotka(ByVal Str1 As String, ByVal n As Integer, ByRef Str2 As String)
  2.     Dim _date As DateTime = DateTime.Parse(Str1)
  3.     Str2 = _date.AddDays(-n).ToString("dd.mm.yy")
  4. End Sub

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


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

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

6   голосов , оценка 4.333 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы