以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  计算包数  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=100044)
--  作者：yjf123
--  发布时间：2017/5/3 16:40:00
--  计算包数

有明细表，每行都有一个包号

比如第一行，1号包

第二行，1号包

第三行，2号包

第四行，3号包

第五行，3号包

第六行，4号包，

 

怎么通过明细表计算有多少包？
--  作者：有点色
--  发布时间：2017/5/3 16:42:00
--  
Dim dt As DataTable = DataTables("表A")
Dim count As Integer = dt.GetValues("第一列").count
msgbox(count)