| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 新增多行 并赋不同的值 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139312) |
|
| -- 作者：yifan3429 -- 发布时间：2019/8/10 20:32:00 -- 新增多行 并赋不同的值 For i As Integer = 1 To 10 Dim nr = Tables("岗位配置").AddNew() nr("公司名称") = "单位" nr("公司名称") = "国家" Next 上面的代码会一次赋值同样的值 我想 第一行等于 1 第二行等于 2 第三行等于 3 以次类推 |
|
| -- 作者：y2287958 -- 发布时间：2019/8/10 21:16:00 -- 可以把这个几个值写成数组或集合 然后循环数组或集合即可 |
|
| -- 作者：有点蓝 -- 发布时间：2019/8/11 21:28:00 -- dim str() as string = {"单位1","单位2"} dim str1() as string = {"国家1","国家2"}
|