Function GetFirstDayOfMonth(ByVal dtDate As Date) As DateTime
Dim dtFrom As Date = dtDate
dtFrom = dtFrom.AddDays(-(dtFrom.Day - 1))
Return dtFrom
End Function
我使用此功能获取一个月的第一天,我在此处调用它:
detail_fromdate = GetFirstDayOfMonth(DateTime.Now.ToString("yyyy-MM-dd")).ToString("dd-MM-yyyy)
但它没有将格式更改为dd-MM-yyyy
答案 0 :(得分:2)
请理解日期没有格式。 ToString或其他方法将格式化外观应用于您的日期,将其转换为适合显示的字符串。
您的功能可以写成
Function GetFirstDayOfMonth(ByVal dtDate As Date) As DateTime
return new DateTime(dtDate.Year, dtDate.Month, 1)
End Function
当你收到约会时
Dim detail_fromdate As DateTime = GetFirstDayOfMonth(DateTime.Today)
Dim stringAsDateToBeDisplayed = detail_fromdate.ToString("dd-MM-yyyy")
或您想要显示的任何格式
顺便说一句,因为你可以选择严格设置为OFF,这允许传递一个字符串时GetFirstDayOfMonth预计日期时间你的代码的工作而已。
Option Strict Off允许从一种类型到另一种类型的自动转换,但如果您不太注意这个问题,这通常会以意想不到的方式踢你。如果不及时使用Option Strict On.