If e.DataCol.name = "piao号" Then
If e.DataRow.isnull("piao号") = False Then
If e.DataRow("特采单") = False Then
If e.DataRow("piao号") = "" Then
e.DataRow("生产piao号") = Nothing
Else
If e.DataRow("piao号").startswith("HL") Then
e.DataRow("生产piao号") = e.DataRow("piao号").SubString(2, 4) & "9260000"
Else
If e.DataRow("piao号").Length = 10 Then
'e.DataRow("piao号") = "0" & e.DataRow("piao号") '此句删除以保留当初输入的格式
e.DataRow("生产piao号") = "0" & e.DataRow("piao号")
End If
If e.DataRow("piao号").Length = 11 Then
e.DataRow("生产piao号") = e.DataRow("piao号")
End If
If e.DataRow("piao号").Length = 13 Then
If dr("piao号").startsWith("920FT") OrElse dr("piao号").startsWith("926FT") Then
dr("生产piao号") = dr("piao号").Substring(5, 4) & dr("piao号").Substring(0, 3) & dr("piao号").Substring(9, 4)
End If
End If
End If
End If
Else
e.DataRow("生产piao号") = e.DataRow("piao号")
End If
e.DataRow.save
end if
End If
上面那段 datacolchanged 代码，老是出现如下提示：
调用的目标发生了异常。
索引和长度必须引用该字符串内的位置。
参数名: length
应该就是红色那部分问题，因为我去除那段，就不会发生提示了。但是我看不出什么问题来。谢谢。
加好友 
发短信
Post By：2023/9/7 10:58:00 [显示全部帖子]
