以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 如何动态增加 Dim val As ...  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83998)

--  作者:coch2004
--  发布时间:2016/4/20 22:42:00
--  [求助] 如何动态增加 Dim val As ...
Dim i As Integer =0
For Each r As Row In Tables("XXX").rows
i=i+1
Dim rt & i  As New prt.RenderTable() \'定义一个表格对象     \'这句代码肯定是错误的, 请求正代码: 如何让系统自动 Dim rt1 As ......  Dim rt2 As ... rt3 As .....

Next

--  作者:大红袍
--  发布时间:2016/4/20 22:43:00
--  

为什么要这样,同名也可以啊

 

Dim rt As New prt.RenderTable() \'定义一个表格对象

 


--  作者:大红袍
--  发布时间:2016/4/20 22:43:00
--  
如果不同名,就只能数组、集合、字典。
[此贴子已经被作者于2016/4/20 22:43:33编辑过]

--  作者:coch2004
--  发布时间:2016/4/21 1:35:00
--  
解决了,谢谢