以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  绘制单元格,满足条件的底纹  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=59632)

--  作者:漂亮美眉vszh
--  发布时间:2014/11/7 11:44:00
--  绘制单元格,满足条件的底纹


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20141107114303.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20141107114303.jpg
图片点击可在新窗口打开查看
我想要打圆的单元格自动出来绿色底纹,可是代码改了,就是不出来,怎么回事?列字段名叫“第一课时”代码:

If e.Col.IsNumeric AndAlso e.Col.Name = "第一课时" Then
    If e.Row.IsNull(e.Col.Name) = False \'且该列已经输入内容
        If e.Row(e.Col.Name) = "○" Then \'如果该列的值小于60
            e.Style = "QJ" \'那么用"不及格"样式绘制单元格
        \'ElseIf e.Row(e.Col.Name) = "×" Then \'如果单元格的值大于95
            \'e.Style = "KK" \'那么用"优秀"样式绘制单元格
        End If
    End If
End If
If e.Col.IsNumeric AndAlso e.Col.Name = "第三课时" Then
    If e.Row.IsNull(e.Col.Name) = False \'且该列已经输入内容
        If e.Row(e.Col.Name) = "○" Then \'如果该列的值小于60
            e.Style = "QJ" \'那么用"不及格"样式绘制单元格
        \'ElseIf e.Row(e.Col.Name) = "×" Then \'如果单元格的值大于95
            \'e.Style = "KK" \'那么用"优秀"样式绘制单元格
        End If
    End If
End If


--  作者:漂亮美眉vszh
--  发布时间:2014/11/7 11:44:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20141107114235.jpg
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2014/11/7 11:46:00
--  

 字符不匹配。设置一下,再拷贝字符 x o 的字符进去

 

http://www.foxtable.com/help/topics/1273.htm

 


--  作者:有点甜
--  发布时间:2014/11/7 11:48:00
--  
If e.Col.Name = "第一课时" Then
    If e.Row.IsNull(e.Col.Name) = False \'且该列已经输入内容
        If e.Row(e.Col.Name) = "○" Then \'如果该列的值小于60
            e.Style = "QJ" \'那么用"不及格"样式绘制单元格
        \'ElseIf e.Row(e.Col.Name) = "×" Then \'如果单元格的值大于95
            \'e.Style = "KK" \'那么用"优秀"样式绘制单元格
        End If
    End If
Else If e.Col.Name = "第三课时" Then
    If e.Row.IsNull(e.Col.Name) = False \'且该列已经输入内容
        If e.Row(e.Col.Name) = "○" Then \'如果该列的值小于60
            e.Style = "QJ" \'那么用"不及格"样式绘制单元格
        \'ElseIf e.Row(e.Col.Name) = "×" Then \'如果单元格的值大于95
            \'e.Style = "KK" \'那么用"优秀"样式绘制单元格
        End If
    End If
End If