请问列类型为备注型的不能做字符相同的判断吗?项目一、二、三、四都是备注列,我是想如果存在相同数据是不添加的,但是不能判断到相同,而是一直可以添加,请问是因为是备注型的原因吗
录入窗口:
此主题相关图片如下:111.png

确定的代码:
Dim sypp As String = e.Form.Controls("TextBox1").Value
Dim cpzl As String = e.Form.Controls("TextBox2").Value
Dim azbm As String = e.Form.Controls("TextBox3").Value
If sypp = "" Then
Messagebox.show("请输入安装包的适用品牌!","提示")
Return
End If
If cpzl = "" Then
Messagebox.show("请输入安装包的产品种类!","提示")
Return
End If
If azbm = "" Then
Messagebox.show("请输入安装包的名称!","提示")
Return
End If
Dim dr As DataRow = DataTables("通用设置").SQLFind("类型 = '配件安装包' and 项目二 = '" & sypp & "' and 项目三 = '" & cpzl & "' and 项目四 = '" & azbm & "'")
If dr IsNot Nothing Then
Messagebox.show("安装包已存在!","提示")
Return
Else
Dim r As Row = Tables("通用设置").Rows.AddNew()
r("类型") = "配件安装包"
r("项目一") = sypp & "-" & cpzl & "-" & azbm
r("项目二") = sypp
r("项目三") = cpzl
r("项目四") = azbm
DataTables("通用设置").Save()
End If
e.Form.close
数据表:
此主题相关图片如下:222.png

[此贴子已经被作者于2020/3/20 8:28:42编辑过]