以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  老生常谈，还是表达式和空值的问题，实在把握不准!  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103569)
--  作者：fczhaobo
--  发布时间：2017/7/11 18:29:00
--  老生常谈，还是表达式和空值的问题，实在把握不准!
Dim xybh As String = e.Form.Controls("学员编号").Value
Dim djbh As String = e.Form.Controls("单据编号").Value
Dim sbxk As String = e.Form.Controls("所报学科").Value

Dim rr As DataRow

rr=DataTables("报名缴费").SQLFind("学员编号=\'" & xybh &  "\' And 单据编号=\'" & djbh &  "\' And 所报学科=\'" & sbxk & "\'")
If rr Is Nothing Then

MessageBox.show("已经重复填报!")
End If

红色字体的两句，不准，请给予修正！
--  作者：wyz20130512
--  发布时间：2017/7/11 20:00:00
--  
If rr IsNot Nothing Then
   MessageBox.show("已经重复填报!")
End If
[此贴子已经被作者于2017/7/11 20:00:28编辑过]