以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何让列中的数据有的可以重复，有的不可以  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=113743)
--  作者：cool314156
--  发布时间：2018/1/22 13:00:00
--  [求助]如何让列中的数据有的可以重复，有的不可以

在表事件DataColChanging 中我输入了下面的代码

 

If e.DataCol.Name = "货位号" Then


hwh = e.DataTable.Find("货位号 = \'" & e.NewValue & "\'")
If hwh IsNot Nothing Then
MessageBox.Show("此货位号已经存在!")

e.Cancel = True
Else
e.NewValue =  77777777 And  e.NewValue =  88888888 And e.NewValue =  99999999


MessageBox.Show("此货位号可以试用!")

End If
End If

 

我的想法是除了77777777，88888888，99999999，这3个货位可以重复放货，其他货位只能放一种货物，但是执行了一下，写入什么都变成0，保存之后会变成数字0，想请教下大大，我的代码哪里出问题了

 

[此贴子已经被作者于2018/1/22 13:11:24编辑过]
--  作者：有点甜
--  发布时间：2018/1/22 14:50:00
--  

hwh = e.DataTable.Find("货位号 = \'" & e.NewValue & "\'")

 

改成

 

hwh = e.DataTable.Find("货位号 = \'" & e.NewValue & "\' and 货位号 not in (\'77777\', \'88888\', \'99999\')")