Строковый календарь в университет - Visual Basic .NET
Формулировка задачи:
Из строки, содержащей корректно заданную дату в формате "dd.mm.yy", где dd – день, mm – месяц, yy – год, получите строку с датой, отстоящей от заданной на n дней назад, в том же формате.
-Это собственно само задание которое мне досталось, здесь на форуме удалось найти рабочий код для практически такой же задачи, только в ней дни считались вперед, а мне нужно назад и у меня все никак не получается понять какие именно строчки нужно поменять, что бы все работало так, как нужно мне, помогите пожалуйста. Тема- строки, нельзя решать задачу другими способами. Найденный код:
Листинг программы
- Sub obrabotka(ByVal Str1 As String, ByVal n As Integer, ByRef Str2 As String)
- Dim month1, month, year, x, y, z As Integer
- x = CInt(Mid(Str1, 1, 2)) 'дни
- y = CInt(Mid(Str1, 4, 2)) 'месяцы
- z = CInt(Mid(Str1, 7)) 'года
- year = (x + n) \ 360 'изменение года
- month = (x + n) \ 30 'изменение месяца
- If x + n < 31 Then
- Str2 = CStr(x + n) & Mid(Str1, 3)
- Else
- month1 = month + y
- While month1 > 12
- month1 = month1 - 12
- End While
- Str2 = CStr(Format(x + n - month * 30, "00")) & "." & CStr(Format(month1, "00")) & "." & CStr(Format(z + year, "00"))
- End If
- End Sub
Решение задачи: «Строковый календарь в университет»
textual
Листинг программы
- Sub obrabotka(ByVal Str1 As String, ByVal n As Integer, ByRef Str2 As String)
- Dim _date As DateTime = DateTime.Parse(Str1)
- Str2 = _date.AddDays(-n).ToString("dd.mm.yy")
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д