我需要填充我的年份和月份值下拉列表对于当前日期+ 1年。 我也希望他们在文本格式,所以“2009年1月1不是2009年这是我写的填充值的代码。我如何将它们转换到一月1?
公用Sub Load_xxxx(为ByRef DDL作为System.Web.UI.WebControls.DropDownList)尝试昏暗我作为整数昏暗J所示整数,其中i = Now.Year要Now.Year对于j = Now.Month要Now.Month + 11 DDL。 Items.Add((j.ToString)+ “” +(i.ToString))接下来接着抓住前作为异常ReportError(前)结束Try结束子
怎么样
Dim time As DateTime = DateTime.Now
Dim j As Integer
For j = 0 To 11
DDL.Items.Add((time.AddMonths(j)).ToString("MMMM"))
Next
如果你只是想整数值,以一个月名称的简单的方法将其转换将只是创建包含月份名称的字符串数组和使用您的Ĵ值作为指标。
Dim time As DateTime = DateTime.Now
DDL.Items.Clear()
While time <= time.AddYears(1)
DDL.Items.Add((time.AddMonths(j)).ToString("MMMM yyyy"))
time = time.AddMonths(1)
Next