在CallDrall里一些代码不能正常执行，是否与是表达式列有关？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 在CallDrall里一些代码不能正常执行，是否与是表达式列有关？

共有2355人关注过本帖树形打印复制链接主题：在CallDrall里一些代码不能正常执行，是否与是表达式列有关？

lyzhuo

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：352 积分：3237 威望：0 精华：0 注册：2012/3/7 10:28:00

在CallDrall里一些代码不能正常执行，是否与是表达式列有关？ 发帖心情

Post By：2016/8/15 12:06:00 [只看该作者]

Select Case e.Col.name
    Case "总序号"
        If e.Row.Locked = True
            e.style = "锁定"
        End If
    Case "未分配指标","指标余额"
        e.style = "灰色"
    Case "附件"
        If e.Row.IsNull(e.Col.Name) = False
            Dim fj As String = e.text
            Dim parts() As String = fj.split(".")
            e.Text = parts(0)
        End If
    Case "指标金额"                       '这个列是数据列可以正常显示" - "
        If e.Row("指标金额") = 0
            e.Text = " - "
        End If
    Case "未分配指标"                    '这个列是表达式列不能正常显示为" - "
        If e.Row("未分配指标") = 0
            e.Text = " - "
        End If
    Case "指标余额"                      '这个列是表达式列不能正常显示为" - "
        If e.Row("指标余额") = 0
            e.Text = " - "
        End If
End Select