以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何将数组或者字典中的值批量赋值到特定列中?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=100054)
--  作者：l20j07
--  发布时间：2017/5/3 20:48:00
--  如何将数组或者字典中的值批量赋值到特定列中?

如果数组（字典）中有10000个字符串条目，如何直接赋值到某列中？就像VBA中的 RESIZ 函数一样！
--  作者：有点色
--  发布时间：2017/5/3 20:57:00
--  

 要写代码赋值

 

Dim Names(3) As String
Names (0) = "杨国辉"
Names (1) = "柯迎"
Names (2) = "陈绍月"
Names (3) = "朱志欣"

 

Dim t As Table = Tables("表A")
For Each name As String In names
    Dim nr As Row = t.AddNew
    nr("第一列") = name
Next
--  作者：l20j07
--  发布时间：2017/5/3 21:17:00
--  

好的，NR 定义为addnew，这个用法好巧妙啊

--  作者：wyz20130512
--  发布时间：2017/5/3 21:30:00
--  
t.AddNew()返回所新增的行（Row）