以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  代码不能正确执行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=25703)
--  作者：lpxjw_zyl
--  发布时间：2012/11/15 8:40:00
--  代码不能正确执行

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 If
Next

 

为什么上述这代码不能正确执行，老六可能有问题哟。
--  作者：lin_hailun
--  发布时间：2012/11/15 8:48:00
--  
改成

 DataTables("表A").DataCols.Add(""& "分数段" & i & "分" &"", Gettype(Double),"","(" & i & ")")

楼主，注意方法，后面三个是针对字符串类型的。

http://www.foxtable.com/help/topics/1428.htm
--  作者：lpxjw_zyl
--  发布时间：2012/11/15 8:57:00
--  

谢谢老兄