For i As Integer = 301 To 700 Step 1 If DataTables("表A").DataCols.Contains("分数段" & i & "分") = False Then DataTables("表A").DataCols.Add(""& "分数段" & i & "分" &"", Gettype(Double),"","" ,"(" & i & ")") ‘些句代码问题 End IfNext
为什么上述这代码不能正确执行,老六可能有问题哟。