重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
你在最后两行之间加一行代码,看看数组的规模大小的结果;
公司主营业务:成都网站建设、成都做网站、移动网站开发等业务。帮助企业客户真正实现互联网宣传,提高企业的竞争能力。成都创新互联公司是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化,感谢他们对我们的高要求,感谢他们从不同领域给我们带来的挑战,让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。成都创新互联公司推出云安免费做网站回馈大家。
Msgbox Ubound(cartnum)
Redim Preserve Arr(10,n)
通过Preserve关键字定义的动态数组,可以更改数组arr最末维的大小,且保留数组arr原来各个元素的值。
所以答案为:C
例如:
Dim arr()
Redim arr(1 to 1,1 to 2)
arr(1,2) = "你好"
Redim Preserve arr(1 to 1, 1 to 3)
msgbox arr(1,2) '这个时候依然可以得到arr(1,2)的值为“你好”。
而且从答案来看,Redim只可能与Preserve联合使用。其他都无法编译!
Array是一个类型,并非一个数组! 如果你想要传递数组,byval A() as string
如果不要原来的数据,直接Redim a(199)
,所有数据清空,如果需要保留原来的数据,加上关键字preserve redim a(199)
,则保留原来数据,如此定义,不会造成内存泄露的
for i =0 to ...
for j =0 to ...
keyarray(i,j)=
next
next
双重循环,赋值和读取一样