木子屋 Dnawo's BLOG

二维数组动态定义-ReDim Preserve

👤 dnawo 📅 2010-09-29 👁 10128 👍 0 💬 0 🔄 来源:海阳之新
在为新数据准备数组,或者要缩减数组大小以节省内存时,这样做是非常有用的。有时希望改变数组大小又不丢失数组中的数据,使用具有 Preserve 关键字的 ReDim 语句就可做到这点。例如,使用 UBound 函数引用上界,使数组扩大、增加一个元素,而现有元素的值并未丢失:

ReDim Preserve DynArray (UBound (DynArray) + 1)

在多维数组中,用 Preserve 关键字只能改变最后一维的上界;如果改变了其它维或最后一维的下界,那么运行时就会出错。所以可这样编程:

ReDim Preserve Matrix (10, UBound (Matrix, 2) + 1)

而不可这样编程:

ReDim Preserve Matrix (UBound (Matrix, 1) + 1, 10)

评论(0)

暂无评论。

验证码
评论需审核通过后显示
← 上一篇 按键精灵8脚本(1.1):QQ连连看 下一篇 → VB6.0注册全局热键