有三列,证件号码(文本型) 出生日期(日期型) 出生日期1(文本型)要求生成“20200105”这种格式的,以下代码错在哪儿。提示:
Exception has been thrown by the target of an invocation.Conversion from string "19780413" to type 'Date' is not valid.
Exception has been thrown by the target of an invocation.Public member 'trim' on type 'Date' not found.
If e.DataCol.Name = "证件号码" Then '如果更改的是身份证号码列
If e.DataRow.IsNull("证件号码") Then '身份证号码是否为空
e.DataRow("出生日期") = Nothing '如果为空,则清除出生日期
Else
'否则从身份证号码列中提取出生日期
e.DataRow("出生日期") = Format(ReadBirthday(e.DataRow("证件号码")),"yyyyMMdd")
e.DataRow("性别") = ReadSex(e.DataRow("证件号码"))
End If
End If
If e.DataCol.Name = "出生日期" Then '如果更改的是身份证号码列
If e.DataRow.IsNull("出生日期") Then '身份证号码是否为空
e.DataRow("出生日期1") = Nothing '如果为空,则清除出生日期
Else
'否则从身份证号码列中提取出生日期
e.DataRow("出生日期1") = e.DataRow("出生日期").trim("-")
End If
End If