如何在日期中添加月份

Question

所以我只想分享我的问题的答案。因此，这是代码：

私人小组Button2_Click（BYVAL发件人为System.Object的，BYVALË作为System.EventArgs）把手Button2.Click
昏暗 NextTime作为日期=现在
TextBox1.Text = NextTime.AddDays（在这里设定的计 0.0）例如“（100.0）
结束子


这可用于截止日期或日期计数器。

Answer 1

Dim newDate As DateTime = DateTime.Parse(Label1.Text).AddMonths(6) 

Duedate.text = newDate.ToString 

你需要确保格式是正确的，虽然，这可以用下面的代码位完成：

Dim pattern As String = "MM-dd-yy" 
Dim parsedDate As Date 

    If DateTime.TryParseExact(Label1.Text, pattern, Nothing, 
          DateTimeStyles.None, parsedDate) Then 
     Console.WriteLine("We're good!) 
    Else 
     Console.WriteLine("Unable to convert") 
    End If