以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  把逻辑性转换为数字参与计算怎么搞？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2634)
--  作者：shixia
--  发布时间：2009/4/29 14:29:00
--  把逻辑性转换为数字参与计算怎么搞？
例如：把为TRUE的逻辑性列作为整数1和其它列进行加减乘除运算，如何转换。如：把朱涛办案数乘以人均案件数。
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:办案.table

[此贴子已经被作者于2009-4-29 14:32:29编辑过]
--  作者：狐狸爸爸
--  发布时间：2009/4/29 15:11:00
--  
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目6.table
--  作者：shixia
--  发布时间：2009/4/29 15:36:00
--  
用代码又该如何写呢？
--  作者：狐狸爸爸
--  发布时间：2009/4/29 15:40:00
--  
IIF(e.rdatarow("某列") = True,1,0)
--  作者：smileboy
--  发布时间：2009/4/29 16:04:00
--  
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
--  作者：mr725
--  发布时间：2009/4/29 19:03:00
--  
dr("人均案件数")=1/(Math.abs(sum)-1)    如果(Math.abs(sum)-1)等于 0 会怎样？
--  作者：八婺
--  发布时间：2009/4/30 0:34:00
--  
以下是引用mr725在2009-4-29 19:03:00的发言：
dr("人均案件数")=1/(Math.abs(sum)-1)    如果(Math.abs(sum)-1)等于 0 会怎样？


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