[VB.NET]新手问“动态数组”问题,很简单的~~~谢谢

VB.NET源码-156个实用实例哦…… <script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
新手问“动态数组”问题,很简单的~~~谢谢
如果不晓得要在一个数组中添加多少元素,就应使用动态数组,那么,如果我不知道多少元素,就先往里面添元素,然后根据我实际添加的元素来决定长度,该如何做呢?我问过个人,他说用
Dim a() As Integer
Dim b As Integer
For b = 1 To 100
a(b) = b
Next
ReDim a(b)
但是,这种方法依然是我知道了我要填写100个,才往里面添的。请问各位,有好的办法么?
__________________________________________________________________________
用ArrayList

*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)

最新版本:20070212

http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
__________________________________________________________________________
List
__________________________________________________________________________
redim Preserve
__________________________________________________________________________
你的代码行不通,在ReDim a(b)之前不可能实现a(b) = b

通常有两种方法:

1、如果你知道数组元素最多不会超过N个
Dim a() As Integer
Dim i As Integer = 0
Redim a(n)
while 未满足你的完成条件时
a(i) = 值
i+=1
end while
ReDim Preserve a(i-1)
只在最后做一遍带值重分配,效率较高。

2、如果无法估计数组元素最高上限,又在任何时刻吝啬每一字节内存(移动设备开发?)
Dim a() As Integer
Dim i As Integer = 0
while 未满足你的完成条件时
ReDim Preserve a(i)
a(i) = 值
i+=1
end while
不断地带值重分配,效率自然就下来了
__________________________________________________________________________
谢谢~~~~~~~~~~~
__________________________________________________________________________
我也遇到的问题,解决了

http://community.csdn.net/Expert/topic/5333/5333341.xml?temp=.2984735
__________________________________________________________________________
  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值