以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  数组赋值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=163832)

--  作者:朱女士
--  发布时间:2021/4/26 11:36:00
--  数组赋值

老师您好!

我想把净资产表中的不同“原料名称”,赋值给一个数组,然后遍历数组,计算每一种原料数据。我不知道怎么写代码:

 

For Each nm As String In DataTables("净资产表").GetValues("原料名称")

......

 

谢谢!


--  作者:有点蓝
--  发布时间:2021/4/26 11:46:00
--  
For Each nm As String In DataTables("净资产表").GetValues("原料名称")
msgbox(DataTables("净资产表").compute("sum(数量)","原料名称=\'" & nm & "\'"))
next