以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]临时表的drawcell问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=61878)

--  作者:李睿涵
--  发布时间:2014/12/21 11:12:00
--  [求助]临时表的drawcell问题
在临时表里的drawcell里写了代码:

Dim dr As DataRow = DataTables("产品信息表").SQLFind("厂家编号  = \'" & e.Row("厂家编号") & "\'")
If dr IsNot Nothing Then
    e.Style = "重复"
End If

Dim dr1 As DataRow = DataTables("产品需求表").SQLFind("厂家编号  = \'" & e.Row("厂家编号") & "\'")

若只写了黑色的代码,运行 OK,加了红色的代码就报错了:
---------------------------
编译错误:“e”是“Private”,因此它在此上下文中不可访问。

错误代码:Dim dr As DataRow = DataTables("产品信息表").SQLFind("厂家编号  = \'" & e.Row("厂家编号") & "\'")
---------------------------

我是想分别对2个表做存在于的判断,并分别用不同颜色标识,请问该怎么做?


--  作者:有点甜
--  发布时间:2014/12/21 11:25:00
--  
 这个报错,是正常显现,算是bug。你关闭项目重新打开即可。