以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  全局代码出错  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=175088)

--  作者:zhuxinhui
--  发布时间:2022/2/19 12:04:00
--  全局代码出错
Public Function abc(ByVal a As String, ByVal b As String, ByVal c As String) As Double
Dim Ins  As Integer
Ins = DataTables("工资").sqlCompute("Sum(金额)","员工 =\'"& a &"\' And 年度 = \'"& b &"\' And AD002 = \'"& c &"\'")
abc = Ins
End Function

这个全局代码哪里出错了
 引用
ABC(1002,2021,01) 时计算不出来

--  作者:有点蓝
--  发布时间:2022/2/19 13:50:00
--  
有符合条件的数据吗

Public Function abc(ByVal a As String, ByVal b As String, ByVal c As String) As Double
Dim Ins  As double
Ins = DataTables("工资").sqlCompute("Sum(金额)","员工 =\'"& a &"\' And 年度 = \'"& b &"\' And AD002 = \'"& c &"\'")
msgbox(ins)
return Ins
End Function

--  作者:zhuxinhui
--  发布时间:2022/2/19 13:56:00
--  
有符合条件的值


--  作者:zhuxinhui
--  发布时间:2022/2/19 13:58:00
--  
我已直接使用公式代替入去试过,求得出值
--  作者:有点蓝
--  发布时间:2022/2/19 14:03:00
--  
msgbox(ins)这里显示是否有值?如果有函数肯定没有问题,检查其它地方代码
--  作者:zhuxinhui
--  发布时间:2022/2/19 15:10:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20220219151026.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20220219150959.png
图片点击可在新窗口打开查看

--  作者:zhuxinhui
--  发布时间:2022/2/19 15:10:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar


--  作者:有点蓝
--  发布时间:2022/2/19 15:53:00
--  
同样的问题不要多处发帖:http://www.foxtable.com/bbs/index.asp?boardid=2&page=