Foxtable(狐表)用户栏目专家坐堂 → 用窗体输入出错求助


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

主题:用窗体输入出错求助

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


加好友 发短信
等级:五尾狐 帖子:798 积分:9630 威望:0 精华:0 注册:2011/4/20 14:23:00
用窗体输入出错求助  发帖心情 Post By:2016/8/29 19:03:00 [只看该作者]

用户已被锁定

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/30 8:43:00 [只看该作者]

1、哪个窗口,怎么测试出错?

在仪器信息新增操作没有发现问题

2、把项目下bin、catch两个目录删除

3、
DataTables("仪器使用明细表").AllowEdit = True
Select Case  e.DataCol.Name
    Case  "预借数量" ,"单价","已交数量"
        If e.DataRow.Isnull("预借数量") Then
            e.DataRow("金额") = Nothing
        Else
            e.DataRow("金额")  = e.DataRow("单价")  * e.DataRow("预借数量")
        End If
        e.DataRow("未交数量") = e.DataRow("预借数量") - e.DataRow("已交数量")
End Select
If Tables("仪器使用主表").Current IsNot Nothing Then
    Tables("仪器使用主表").Current("总金额") = DataTables("仪器使用明细表").Compute("sum(金额)","借仪单号 = '" & Tables("仪器使用主表").Current("借仪单号") & "'")
End If

 回到顶部