以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]增加临时列  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=174704)

--  作者:michl
--  发布时间:2022/1/27 11:05:00
--  [求助]增加临时列
增加临时列,使用代码1报错,换了代码2正常,但是感觉两个一样啊
代码1:
With DataTables("表A")
    For Each dc As DataCol In .DataCols
        If dc.IsNumeric Then
            .DataCols.Add(dc.Name & "等级",Gettype(String))
        End If
    Next
End With

代码2:
With DataTables("表A")
    For i As Integer = 0 To .DataCols.count -1
        If .DataCols(i).IsNumeric Then 
            .DataCols.Add(.DataCols(i).Name & "等级",Gettype(String))
        End If
    Next
End With


--  作者:有点蓝
--  发布时间:2022/1/27 11:17:00
--  
不一样的,在遍历前.DataCols.count是固定的。但是在遍历的过程中.DataCols集合是在变化的,因为有增加列的代码
--  作者:michl
--  发布时间:2022/1/27 11:55:00
--  
明白了,谢谢