- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 代码修改 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=12125)
-- 发布时间：2011/8/23 20:29:00
-- 代码修改
"比率"列为Double数据类型
If e.DataCol.Name = "比率" Then \'
Dim dr As DataRow
dr = e.DataTable.Find("货品编号 = \'" & e.DataRow("货品编号") & "\' And 比率 = " & e.NewValue )
If dr IsNot Nothing Then
MessageBox.Show("比率不能重复!")
e.Cancel = True
End If
End If
删除"比率"列的数值时会出错,请帮忙修改,谢谢!
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目3.table |
-- 发布时间：2011/8/23 21:31:00
--
If e.DataCol.Name = "比率" Then
If e.NewValue IsNot Nothing Then
Dim dr As DataRow
dr = e.DataTable.Find("货品编号 = \'" & e.DataRow("货品编号") & "\' And 比率 = " & e.NewValue )
If dr IsNot Nothing Then
MessageBox.Show("比率不能重复!")
e.Cancel = True
End If
End If
End If
[此贴子已经被作者于2011-8-23 21:34:12编辑过]