我只想分享我的问题的答案。这是代码:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim NextTime As Date = Now
TextBox1.Text = NextTime.AddDays("set a count here".0) ' for example (100.0)
End Sub
这可用于截止日期或日期计数器。