如何计算标题中前两个字符相同的数据表列(动态创建)?到目前为止,这是我的代码,但无效。
For col As Integer = 3 To dt.Columns.Count - 1
Dim cntLE, cntUE As Integer
If dt.Columns(col).ColumnName.Substring(0, 2) = "LE" Then
cntLE = dt.Columns.Count
ElseIf dt.Columns(col).ColumnName.Substring(0, 2) = "UE" Then
cntUE = dt.Columns.Count
End If
Next
答案 0 :(得分:2)
这是因为您要将整个列数(即dt.Columns.Count
)分配给计数器,而不是在找到时将它们递增1。
试试这个。
For col As Integer = 3 To dt.Columns.Count - 1
Dim cntLE, cntUE As Integer
If dt.Columns(col).ColumnName.Substring(0, 2) = "LE" Then
cntLE = cntLE + 1
ElseIf dt.Columns(col).ColumnName.Substring(0, 2) = "UE" Then
cntUE = cntUE + 1
End If
Next