以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  字符类型统计  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=133213)

--  作者:ryubo888
--  发布时间:2019/4/9 18:40:00
--  字符类型统计
在字符型列字段名 131 列输入1、2、3、一、二、三 数字字段 工数   自动统计,如何写代码,请高人指点,谢谢
图片点击可在新窗口打开查看此主题相关图片如下:1554806318(1).png
图片点击可在新窗口打开查看
  
[此贴子已经被作者于2019/4/9 18:41:53编辑过]

--  作者:有点甜
--  发布时间:2019/4/9 19:14:00
--  

 

做一个foxtable的项目发上来测试一下。

 

 

 


--  作者:ryubo888
--  发布时间:2019/4/9 19:24:00
--  
就想编个后勤录入的程序
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:采煤区记工记分录入.zip

[此贴子已经被作者于2019/4/9 19:26:12编辑过]

--  作者:有点蓝
--  发布时间:2019/4/9 20:20:00
--  
如果使用表达式参考:http://www.foxtable.com/webhelp/scr/0602.htm

如果使用代码计算,到表格datacolchanged事件输入以下代码:
If e.DataCol.Name.StartsWith("分") AndAlso e.DataCol.Name <> "分值" Then \'如果列名以分开头,并且名称不等于“分值”
    Dim sum As Integer
    For i As Integer = 1 To 31 \'遍历1~31号的分值列
        sum = sum + e.DataRow("分" & i) ‘把这列的值加起来
    Next
    e.DataRow("总分合计") = sum ‘把求和的结果赋值给总计列
End If