如何获取特定月份的最后一天

Question

我有一个用于插入日期的文本框，称为开始日期。

我想要的是，当用户插入日期时，我应该在另一个文本框中输入月份的最后一天。

例如： 开始日期：23/09/2018“我的格式是dd / mm / yyyy”

最后日期：2018年9月30日

Answer 1

您好，欢迎来到堆栈溢出！我认为以下代码是您所需要的：

Dim MyDate As Date = Date.Parse(TextBox1.Text)
Dim DaysInMonth As Integer = Date.DaysInMonth(MyDate.Year, MyDate.Month)
Dim LastDayInMonthDate As Date = New Date(MyDate.Year, MyDate.Month, DaysInMonth)
TextBox2.Text = LastDayInMonthDate.ToString("dd/MM/yyyy")

希望这会有所帮助！ ^^