Foxtable(狐表)用户栏目专家坐堂 → 代码


  共有1966人关注过本帖平板打印复制链接

主题:代码

美女呀,离线,留言给我吧!
13775189031
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:807 积分:5579 威望:0 精华:0 注册:2017/12/19 14:46:00
代码  发帖心情 Post By:2019/6/5 13:44:00 [只看该作者]

增加下列代码后,显示:
.NET Framework 版本:2.0.50727.8941
Foxtable 版本:2019.4.12.1
错误所在事件:表,生产令号,DataColChanged
详细错误信息:
调用的目标发生了异常。
表达式包含无效的字符串常量: '。
是什么原因


If e.DataCol.Name = "已入库数量" Then
    If e.NewValue Is Nothing Then
        e.DataRow("当月入库数量") = Nothing
    Else
        Dim dr1 As DataRow
        Dim y As Integer = Date.Today.Year
        Dim m As Integer = Date.Today.Month
        Dim dt1 As New Date(y, m, 1)
        Dim dt2 As New Date(y, m, Date.DaysInMonth(y, m)) '获取本月的最后一天
        Dim Filter As String
        dr1 = DataTables("入库信息").Find("[生产令号] = '" & e.DataRow("生产令号") & "' And 入库时间  >= #" & dt1 & "# And 入库时间 <= #" & dt2 & "#" & "'")
        If dr1 IsNot Nothing
            e.DataRow("当月入库数量") = dr1("当月入库数量")
        End If
    End If
End If
[此贴子已经被作者于2019/6/5 14:00:22编辑过]

 回到顶部