以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  老师们帮忙看看哪里错了?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85314)

--  作者:lovebc299
--  发布时间:2016/5/23 11:04:00
--  老师们帮忙看看哪里错了?
做完以后不求和

Dim sbh As String =e.Form.controls("combobox1").value

If a2.IsNull("工序用时") = False  Then
            Dim d1 As Row
            Dim d3 As Long
           \' d1 = DataTables("排单表_table2").find(sbh)
            d3 =  Tables("排单表_table2").Compute("sum(工序用时)","设备号=sbh")  ‘ 这一步为什么不求和?
            Dim d As Date = #7:30:00#
            d = d.AddMinutes(d3)
            a2("完成时间") = d.hour &":"&d.minute
        End If

--  作者:lovebc299
--  发布时间:2016/5/23 11:06:00
--  
            d3 =  Tables("排单表_table2").Compute("sum(工序用时)","设备号=sbh")  ’把这里的sbh改成\'一号\'时,就自动求和,根据声明的控件值,就不求和


--  作者:大红袍
--  发布时间:2016/5/23 11:07:00
--  

 

d3 =  Tables("排单表_table2").Compute("sum(工序用时)","设备号=\'" & sbh & "\'")  \' 这一步为什么不求和?


--  作者:lovebc299
--  发布时间:2016/5/23 11:10:00
--  
谢谢老师,能给解释一下为什么吗?
--  作者:大红袍
--  发布时间:2016/5/23 11:12:00
--  

 看看这里

 

http://www.foxtable.com/help/topics/0221.htm

 

http://www.foxtable.com/help/topics/1647.htm