计算特定列名称

时间:2018-05-07 07:46:14

标签: vb.net-2010

我只是想知道为什么vb不会执行10月份的数据?这是我的代码。

For col As Integer = 4 To ldtData.Columns.Count - 1 
If ldtData.Columns(col).ColumnName.Substring(0, 1) = "1" 
Then cnt1 = cnt1 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 1) = "2" 
Then cnt2 = cnt2 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 1) = "3" 
Then cnt3 = cnt3 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 1) = "4" 
Then cnt4 = cnt4 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 1) = "5" 
Then cnt5 = cnt5 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 1) = "6" 
Then cnt6 = cnt6 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 1) = "7" 
Then cnt7 = cnt7 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 1) = "8" 
Then cnt8 = cnt8 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 1) = "9" 
Then cnt9 = cnt9 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 2) = "10" 
Then cnt10 = cnt10 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 2) = "11" 
Then cnt11 = cnt11 + 1 
ElseIf ldtData.Columns(col).ColumnName.Substring(0, 2) = "12" 
Then cnt12 = cnt12 + 1 
End If 
Next

对于第1个月到第9个月,将计算基于个月的数据量,但是对于第10个月,第11个月,第12个月。它将以cnt1执行。为什么呢?

1 个答案:

答案 0 :(得分:0)

通过在子字符串方法之后的每个预期输出中添加-来解决问题。

If ldtData.Columns(col).ColumnName.Substring(0, 1) = "1-"
.
.
. 

ElseIf ldtData.Columns(col).ColumnName.Substring(0, 1) = "10-"