Foxtable(狐表)用户栏目专家坐堂 → 减号报错


  共有150人关注过本帖树形打印复制链接

主题:减号报错

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/10 11:16:00 [显示全部帖子]

把"预算类型"列类型改为双精度

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/10 11:48:00 [显示全部帖子]

减号就是做减法,怎么会不参与计算?!

加号出来做加法,还可以用来合并字符串,所没有问题

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/10 11:57:00 [显示全部帖子]

剩下的还有字符列吗

For Each dc As DataCol In DataTables("预算报表_table1").DataCols
    If dc.name = "预算类型" Then
        Continue For
    Else 
        Dim r0 As Row = Tables("预算报表_table1").Rows(0) 这一句必须换行,不能和Else 同一行
        Dim r1 As Row = Tables("预算报表_table1").Rows(1)
        Dim r2 As Row = Tables("预算报表_table1").Rows(2)
        r0(dc.name) = r1(dc.name) - r2(dc.name)
    End If
Next

 回到顶部