专家坐堂-Drawcell事件：代码出错问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  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=174348)

--  作者：xnsiwei
--  发布时间：2022/1/12 7:25:00
--  Drawcell事件：代码出错问题

Drawcell事件：代码出错问题
Drawcell事件：

if e.col.name = "年均是否达标" then
if e.row("年均是否达标") = 是 then
e.Style = "达标"
else
e.Style = "超标"
End if
End if

--  作者：y2287958
--  发布时间：2022/1/12 9:02:00
--
e.row("年均是否达标") = “是” ？

--  作者：xnsiwei
--  发布时间：2022/1/12 14:23:00
--
如图，希望对是和否进行判断，然后标颜色
此主题相关图片如下：33.png

--  作者：有点蓝
--  发布时间：2022/1/12 14:29:00
--
如果是字符串加上双引号，如果是逻辑列，使用true/false

--  作者：xnsiwei
--  发布时间：2022/1/12 15:50:00
--

If e.Col.name = "年均是否达标" Then
If e.Row("年均是否达标") = "是" Then
e.Style = "达标"
Else
  If e.Row("年均是否达标") = "是" Then
e.Style = "超标"
end if
End If
End If

无反应

--  作者：有点蓝
--  发布时间：2022/1/12 15:58:00
--
总是做一些多此一举的事

If e.Col.name = "年均是否达标" Then
If e.Row("年均是否达标") = "是" Then
e.Style = "达标"
Else
e.Style = "超标"
End If
End If

--  作者：xnsiwei
--  发布时间：2022/1/12 21:41:00
--

If e.Col.name = "是否年均达标" Then
If e.Row("是否年均达标") = "是" Then
e.Style = "达标"
Else
If e.Row("是否年均达标") = "否" Then
e.Style = "超标"
End If
End If
End If

搞定，谢谢