能不能将这段代码改成在还款日期中自动在下面增加行数
比如还款日期6月5日，我则能再下面自动插入6月10日、六月15日、六月20日、六月25日、六月30日？（现在的代码只能显示一行，不能增加。并且如果遇到有31号的月份会错误。。。还款日期固定是每月的5、10、15、20、25、30。不能出现别的日期改怎么弄）
If e.DataCol.Name = "第一次还款时间" Then
If e.NewValue = Nothing Then
e.DataRow("还款日期") = Nothing
e.DataRow("还款日期") = Nothing
e.DataRow("还款日期") = Nothing
e.DataRow("还款日期") = Nothing
e.DataRow("还款日期") = Nothing
Else
e.DataRow("还款日期") = e.newvalue.AddDays(5)
e.DataRow("还款日期") = e.newvalue.AddDays(10)
e.DataRow("还款日期") = e.newvalue.AddDays(15)
e.DataRow("还款日期") = e.newvalue.AddDays(20)
e.DataRow("还款日期") = e.newvalue.AddDays(25)
End If
End If
加好友 
发短信
Post By：2016/6/8 17:10:00 [显示全部帖子]
