[求助]怎么统计本行各符号的个数？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim dr As DataRow

Dim c() As Integer={0,0,0,0}

dr = DataTables("项目补助信息").Find("名称 = '" & e.Row("项目名称") & "'")

c(0)+=e.Row("项目_1") * dr("驻外补贴")

c(1)+=e.Row("项目_1") * dr("餐补")

c(2)+=e.Row("项目_1") * dr("通讯")/30

c(3)+=e.Row("项目_1") * dr("交通")/30

dr = DataTables("项目补助信息").Find("名称 = '" & e.Row("项目名称2") & "'")

c(0)+=e.Row("项目_2") * dr("驻外补贴")

c(1)+=e.Row("项目_2") * dr("餐补")

c(2)+=e.Row("项目_2") * dr("通讯")/30

c(3)+=e.Row("项目_2") * dr("交通")/30

dr = DataTables("项目补助信息").Find("名称 = '" & e.Row("项目名称3") & "'")

c(0)+=e.Row("项目_3") * dr("驻外补贴")

c(1)+=e.Row("项目_3") * dr("餐补")

c(2)+=e.Row("项目_3") * dr("通讯")/30

c(3)+=e.Row("项目_3") * dr("交通")/30

e.Row("合计_驻外补贴") = c(0)

e.Row("合计_餐补") = c(1)

e.Row("合计_通讯") =c(2)

e.Row("合计_交通") = c(3)

主题：[求助]怎么统计本行各符号的个数？