请问老师
我有一列“状态”的逻辑列
和一列“姓名”
如果同姓名的上一个逻辑列没有打勾
姓名列就不许输入数据。请老师看看,下面的代码是哪里错了,
此主题相关图片如下:001.jpg
-----------------------------------------------------------------------
Select Case e.DataCol.name
Case "状态","姓名"
Dim dr As DataRow = e.DataRow
If dr.IsNull("状态") = False AndAlso dr.IsNull("姓名") = False Then
For Each s As String In dr("姓名").split(",")
If s > "" Then
If e.DataTable.Compute("Count([_Identify])","姓名 = '" & dr("姓名") & "' And "状态" False Then
MessageBox.Show("此订单未完成!","友情提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
e.DataRow(e.DataCol.Name) = e.OldValue '取消输入
Exit For
End If
End If
Next
End If
End Select
[此贴子已经被作者于2020/7/16 14:08:38编辑过]