主题：[求助] DrawCell绘制

此主题相关图片如下：微信截图_2017071621130700.jpg

老师 您好

  

DrawCell绘制，怎样才能达到上图的效果，

 

必需前的指定列=True时，后面的再开始判断，如果是true，才绘制。

 

我写的代码如下： Return 没有达到效果，代理执行结果看下图。

 

If e.Col.Name = "面料" Or e.Col.Name = "面料日期" Then
    If e.Row("面料") = True Then
        e.Style = "OK"
    Else
        Return
    End If
End If

If e.Col.Name = "辅料" Or e.Col.Name = "辅料日期" Then
    If e.Row("辅料") = True Then
        e.Style = "OK"
    Else
        Return
    End If
End If

If e.Col.Name = "布料工艺" Or e.Col.Name = "布料工艺名称" Then
    If e.Row("布料工艺") = 1 Then
        e.Style = "OK"
    Else
        Return
    End If
End If

If e.Col.Name = "裁剪数量" Or e.Col.Name = "裁剪日期" Or e.Col.Name = "裁剪" Or e.Col.Name = "裁数审核" Then
    If e.Row("裁数审核") = True Then
        e.Style = "OK"
    Else
        Return
    End If
End If

此主题相关图片如下：232323.jpg

If e.Row("面料") = True Then
    If e.Col.Name = "面料" Or e.Col.Name = "面料日期" Then
        e.Style = "OK"
    End If
Else
    Return
End If
If e.Row("辅料") = True Then
    If e.Col.Name = "辅料" Or e.Col.Name = "辅料日期" Then
        e.Style = "OK"
    End If
Else
    Return
End If
If e.Row("布料工艺") = 1 Then
    If e.Col.Name = "布料工艺" Or e.Col.Name = "布料工艺名称" Then
        e.Style = "OK"
    End If
   
Else
    Return
End If
If e.Row("裁数审核") = True Then
    If e.Col.Name = "裁剪数量" Or e.Col.Name = "裁剪日期" Or e.Col.Name = "裁剪" Or e.Col.Name = "裁数审核" Then
        e.Style = "OK"
    End If   
Else
    Return
End If

谢谢您的指点