以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]数据标记 代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88974)

--  作者:北冰洋
--  发布时间:2016/8/12 17:01:00
--  [求助]数据标记 代码
求助 有一列 票号 是连续的数字 怎么让下面一行的票号不等于上面一行+1的时候,就改变一下颜色 

DrawCell这个事件 

If e.Col.Name="票号"And e.Row("票号")<>票号+1     这一句成这样了  怎么改?

    e.Style="票号"




--  作者:大红袍
--  发布时间:2016/8/12 18:13:00
--  

If e.Row.Index > 0 AndAlso e.Col.Name="票号" And e.Row("票号") <> e.Table.rows(e.Row.index-1)("票号")+1
    e.Style="票号"
End If


--  作者:北冰洋
--  发布时间:2016/8/12 18:18:00
--  
老师 不能排序了 票号排序了就不执行代码了 怎么办
--  作者:北冰洋
--  发布时间:2016/8/12 18:23:00
--  
详细错误信息:
调用的目标发生了异常。
从字符串“票号”到类型“Double”的转换无效。
输入字符串的格式不正确。


--  作者:大红袍
--  发布时间:2016/8/12 18:26:00
--  

If e.Row.Index > 0 AndAlso e.Col.Name="票号" AndAlso val(e.Row("票号")) <> val(e.Table.rows(e.Row.index-1)("票号"))+1
    e.Style="票号"
End If


--  作者:北冰洋
--  发布时间:2016/8/12 18:56:00
--  
完美 谢谢