以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]DataRow 表达字段数值时为什么会报错?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=60972)

--  作者:whyfoxtable
--  发布时间:2014/12/4 16:06:00
--  [求助]DataRow 表达字段数值时为什么会报错?
Object reference not set to an instance of an object.

上面是报错信息。。。

下面是代码:
Dim DR As DataRow
DR = DataTables("BRT_Task").Find("TaskCode" = "\'" & Tables("任务选择_Table2").Current("任务代码") & "\'") 
If (( DR IsNot Nothing )  And DR("StartReportDate") <> 1  )
End If

经过复查,出错在第三句DR("StartReportDate")


如何改比较好?

--  作者:有点甜
--  发布时间:2014/12/4 16:07:00
--  

Dim DR As DataRow
DR = DataTables("BRT_Task").Find("TaskCode = \'" & Tables("任务选择_Table2").Current("任务代码") & "\'")
If  DR IsNot Nothing AndAlso DR("StartReportDate") <> 1

 

 


End If


--  作者:Bin
--  发布时间:2014/12/4 16:07:00
--  
不能放在一起判断 

If DR IsNot Nothing then
if DR("StartReportDate") <> 1  then
 end if
End If

--  作者:whyfoxtable
--  发布时间:2014/12/4 16:16:00
--  
谢谢两位大师,一下子看到症结。我再消化消化,SQL里的 WHERE ,ON 等子句用And, 程序代码里的If 不能用And,只能用 AndAlso来代替。。。。。