If e.datarow.isnull("第一列") then
e.datarow("第二列") = nothing
Else
Dim Val As String = e.Datarow("第一列")
If Val.Indexof("-") > 0 then
e.Datarow("第二列") = Val.substring(val.Indexof("-") + 1).Trim()
End if
加好友 
发短信
Post By：2008/10/14 13:58:00 [显示全部帖子]
