Dim i1 As Integer =10
Dim fdr As DataRow = DataTables("Train_info").sqlFind("ID_CARD = '" & Tables("tb_pxbm").Rows(i1)("papernum") & "' and Train_Class = '管理人员' and county = '" & Tables("tb_pxbm").Rows(i1)("county") & "' and is_meeting <> true ","Train_Date desc")
If fdr IsNot Nothing Then
messagebox.show(fdr("bmID"))
Else
messagebox.show("1")
End If
Dim fd As DataRow = DataTables("Train_info").Find("ID_CARD = '" & Tables("tb_pxbm").Rows(i1)("papernum") & "' and Train_Class = '管理人员' and county = '" & Tables("tb_pxbm").Rows(i1)("county") & "' and is_meeting <> true ","Train_Date desc")
If fd IsNot Nothing Then
messagebox.show(fd("bmID"))
Else
messagebox.show("2")
End If
同样的条件，Find 与SQLFind 查询的结果是不一样的
SQLFind 跑到了messagebox.show("1")
find 就正常显示messagebox.show(fd("bmID"))
加好友 
发短信
Post By：2017/8/28 10:29:00 [显示全部帖子]
