Dim s As String =e.DataRow("pic")s = s.Replace("/","\")
改成
e.DataRow("pic") = e.DataRow("pic").Replace("/","\")