主题：把逻辑性转换为数字参与计算怎么搞？

例如：把为TRUE的逻辑性列作为整数1和其它列进行加减乘除运算，如何转换。如：把朱涛办案数乘以人均案件数。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:办案.table

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目6.table

用代码又该如何写呢？

IIF(e.rdatarow("某列") = True,1,0)

Dim Colnames() as String={"朱涛","熊柳雄","梅鲲鹏","徐宛婉","李余","胡炜烽","汪家兵"}
For i As Integer = 0 To ColNames.Length-1
    Dim name as String = Colnames(i).SubString(0,1)
    if dr(Colnames(i))=True then
        dr("人均案件数")=1/(Math.abs(sum)-1)
        dr("案数" & name)=dr(colnames(i))*dr("人均案件数")*(-1)
    else
        dr("案数" & name)=Nothing
    end if
next

dr("人均案件数")=1/(Math.abs(sum)-1)    如果(Math.abs(sum)-1)等于 0 会怎样？

不会的，只有sum等于3时才会减1，所以不会出现这个结果。