Foxtable(狐表)用户栏目专家坐堂 → 自定义样式


  共有2105人关注过本帖树形打印复制链接

主题:自定义样式

帅哥哟,离线,有人找我吗?
g1j2h3
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:390 积分:4650 威望:0 精华:0 注册:2016/4/30 10:41:00
自定义样式  发帖心情 Post By:2024/9/25 14:10:00 [只看该作者]

请教大师,下边这段代码错在哪里,如果备注列含有“作废”,那么所在行样式将显示“作废”样式
With Tables("接单登记")
    Dim r As Integer
    r = .Find("作废", 0, "备注", False, False, True)
    If r > - 1 Then '如果找到符合条件的行
        .Position = r '则选择该行
        e.Style = "作废"
    End If 
End With

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111405 积分:567095 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/9/25 14:48:00 [只看该作者]

先看看:http://www.foxtable.com/webhelp/topics/0604.htm,再看看:http://www.foxtable.com/webhelp/topics/2925.htm

drawcell事件

    If e.row("备注") = "作废" Then '如果找到符合条件的行
        e.Style = "作废"
    End If 

 回到顶部
帅哥哟,离线,有人找我吗?
g1j2h3
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:390 积分:4650 威望:0 精华:0 注册:2016/4/30 10:41:00
  发帖心情 Post By:2024/9/25 15:57:00 [只看该作者]

可能我没说清楚,备注列内有多个内容,譬如:“含运费  作废”,如何写代码,麻烦老师指教
[此贴子已经被作者于2024/9/25 15:58:16编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111405 积分:567095 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/9/25 16:03:00 [只看该作者]

http://www.foxtable.com/webhelp/topics/1422.htm

If e.row.isnull("备注")=false andalso e.row("备注").Contains("作废") Then

 回到顶部
帅哥哟,离线,有人找我吗?
g1j2h3
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:390 积分:4650 威望:0 精华:0 注册:2016/4/30 10:41:00
  发帖心情 Post By:2024/9/25 16:06:00 [只看该作者]

谢谢老师

 回到顶部