- 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=193839)
-- 发布时间：2024/10/20 10:40:00
-- [求助]drawcell问题
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:表格drawcell.rar |
想通过table控件的drawcell事件实现点击当前行后改变样式,事件代码如下:
If e.Row("第一列") = "2" Then \'And e.Row.Index <> e.Table.Rows.Count
e.style="已审核"
End If
If e.Row.Index=e.Table.Current.Index And e.Row("第一列") = "2" Then \'And e.Row.Index <> e.Table.Rows.Count
e.style="已选择"
End If
打开表格后,点击数据行没有问题,但是点击合计行的时候报错,请问是什么原因呢?
此主题相关图片如下：drawcellbug.png
兄弟们,我已经解决了,原来tb.current在合计行是null值,加了个空值判断就没事了
If e.Table.Current IsNot Nothing Then
If e.Row.Index=e.Table.Current.Index And e.Row("第一列") = "2" Then \'And e.Row.Index <> e.Table.Rows.Count
e.style="已选择"
End If
End If
打扰了,不知道要怎么删帖,找了半天没有删除的操作,打扰大家了,可以告知一下怎么删帖吗
[此贴子已经被作者于2024/10/20 16:04:54编辑过]
-- 发布时间：2024/10/20 19:58:00
--
If e.Row.Index=e.Table.rowsel And e.Row("第一列") = "2" Then \'And e.Row.Index <> e.Table.Rows.Count
e.style="已选择"
End If
-- 发布时间：2024/10/21 7:57:00
--
谢谢蓝老师,又学到一招