另类解法
Dim r As Integer = CurrentTable.Compute("count(第一列)","第一列 = '√'")r = r + CurrentTable.Compute("count(第二列)","第二列 = '√'")'以此类推累加到第N列计算出来的个数Output.Show(r)