老师,我的这段代码不执行,错在哪里?
Select Case e.DataCol.Name
Case "作废fa piao号码","fa piao号码"
Dim st As String = e.DataRow("作废fa piao号码")
Dim Str As String = e.DataRow("fa piao号码")
If st.Contains("str") And e.DataRow("打印次数") = 1 Then
e.DataRow("作废fa piao金额") = e.DataRow("金额")
else
e.DataRow("作废fa piao金额") = nothing
End If
End Select
已解决 If st.Contains(str) And e.DataRow("打印次数") = 1 Then
[此贴子已经被作者于2016/9/22 9:33:17编辑过]