在datarowadded事件,希望合并excel到“推存人手机”列,“降级日期”列自动延长,不知什么原因,未能实现,提示如下:
.NET Framework 版本:2.0.50727.3655
Foxtable 版本:2016.7.29.1
错误所在事件:表,男生资料,DataRowAdded
详细错误信息:
调用的目标发生了异常。
未将对象引用设置到对象的实例。
以下是代码:
'根据"推荐人手机"列,系统自动延长"降级日期"列
If e.DataRow("推荐人手机") IsNot Nothing Then
Dim tjrsj As Double = e.DataRow("推荐人手机") '定义,推荐人手机,首字母命名
Dim drjj As DataRow = DataTables("男生资料").Find("[手机号码] = '" & tjrsj & "'") '定义推荐人所在的行,根据推荐人手机号,找到推荐人所在的行.变量名是dr降级的首字母
Dim d As Date = drjj("降级日期") '定义已有降级日期
Dim t As Date = Date.today '定义当天日期
If drjj("降级日期") Is Nothing Then
d = t.adddays(30) '加上30天
Else
d = d.adddays(30) '加上30天
End If
End If
[此贴子已经被作者于2016/10/23 13:58:14编辑过]