vb.net代码 勾选数据时使用NOTES列的值判断有没有重复的数据被选中...
发布网友
发布时间:2023-12-22 04:02
我来回答
共1个回答
热心网友
时间:2024-07-22 05:24
Dim oNotes As String = Made4Net.DataAccess.DataInterface.ExecuteScalar("select notes from BOM where consignee='{0}' and PARTSKU='{1}'")
if onotes="" then msgbox "onotes为null!"
Dim BomList As List(Of String)= oNotes.Split(",").ToList‘(版本问题,可能没有tolist,用你原来的。只是strarr可能是null,你没有说错误在哪一句。)
Dim drBom As DataRow
For Each drBom In ds.Tables(0).Rows
If BomList.Contains(drBom("Notes")) Then
BomList.Remove(drBom("Notes"))
End If
Next