以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  背景颜色  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=185866)
--  作者：良才
--  发布时间：2023/3/22 10:12:00
--  背景颜色
请指教
窗口查询表DrawCell
Select Case e.Col.Name
    Case "年级", "班级"
        If e.Row.IsNull("年级") = False OrElse e.Row.IsNull("班级") = False Then
            If e.Row("年级") <> Mid(e.Row("班级"), 1, 1) Then
           曹晓冉的年级和班级字体变红
            End If
        End If
End Select
图片点击可在新窗口打开查看
[此贴子已经被作者于2023/3/22 10:15:28编辑过]
--  作者：有点蓝
--  发布时间：2023/3/22 10:18:00
--  
图片点击可在新窗口打开查看
--  作者：良才
--  发布时间：2023/3/22 11:02:00
--  
老师看代码错在哪
Select Case e.Col.Name
    Case "年级", "班级"
        If e.Row.IsNull("年级") = False OrElse e.Row.IsNull("班级") = False Then
            If e.Row("年级") <> Mid(e.Row("班级"), 1, 1) Then
            e.Style = "样式1"
            End If
        End If
End Select
--  作者：有点蓝
--  发布时间：2023/3/22 11:16:00
--  
http://www.foxtable.com/webhelp/topics/0220.htm

        If e.Row.IsNull("年级") = False andalso e.Row.IsNull("班级") = False Then
            If e.Row("年级") <> e.Row("班级").substring(0, 1) Then http://www.foxtable.com/webhelp/topics/1338.htm
--  作者：良才
--  发布时间：2023/3/22 11:28:00
--  
老师这样不行
Select Case e.Col.Name
    Case "年级", "班级"
        If e.Row.IsNull("年级") = False OrElse e.Row.IsNull("班级") = False Then
            If e.Row("年级") <> e.Row("班级").substring(0, 1) Then
                 e.Style = "样式1"
            End If
        End If
End Select
--  作者：有点蓝
--  发布时间：2023/3/22 11:30:00
--  
认真看4楼
--  作者：良才
--  发布时间：2023/3/22 12:01:00
--  
老师帮我看看
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip
--  作者：有点蓝
--  发布时间：2023/3/22 12:12:00
--  
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip
--  作者：良才
--  发布时间：2023/3/24 8:10:00
--  
谢谢
--  作者：良才
--  发布时间：2023/3/31 10:47:00
--  
按颜色筛选，"年级"列背景红色，请老师指教，谢谢！
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip

[此贴子已经被作者于2023/3/31 10:50:59编辑过]