Select Case e.DataCol.Name Case "印刷完成", "后期", "质检" Dim str As String = "" If e.DataRow("印刷完成") = True Then str &= "印刷已完成," End If If e.DataRow("后期") = True Then str &= "后期已完成," End If If e.DataRow("印刷完成") = True Then str &= "后期已完成," End If e.DataRow("备注") = str.TrimEnd(",") End Select
加好友 
发短信
Post By：2014/6/24 17:22:00 [显示全部帖子]
