主题：窗体不加载数据怎么判断重复值

窗体默认不加载任何数据  此代码 不能判断单号是否重复  项目如下

If e.DataCol.name = "单号" Then
    Dim dr As DataRow = DataTables("录单").Find("单号 = '" & e.NewValue & "'")
    If dr IsNot Nothing Then
        MessageBox.Show("此单号已存在")
        e.Cancel=True
    End If
End If

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:快递系统.rar