关於vb的redim函数

发布网友发布时间：2022-04-25 00:04

共5个回答

热心网友时间：2023-10-16 18:06

是VB的什么版本，在VB.net里
要这样

ReDim a(i)

但是，你这个应该使用Preserve关键字的？？？即：
ReDim Preserve a(i)

否则，前面元素里的产生的数字都为0了！追问vb6.0
我的问题是因为重覆定义类型所以导致错误吗？
什麼情况下可以在redim後面加上as type？

追答不是这个原因！
如果是VB6，是不会出错误的！
建议，安装VB6 简体中文企业版 + 补丁 SP6
你的代码，在我这里运行，没有提示错误。不过逻辑上的问题，上面大家都提出来了！

热心网友时间：2023-10-16 18:07

将 As Integer 去掉可以正常运行。但问题是 ReDim 会清空数组，所以最终数组 a 中只会保留下一个数值。需要加上 preserve 参数。

热心网友时间：2023-10-16 18:07

把这句 ReDim a(i) As Integer '在这里出现错误讯息:不能改变阵列元素的资料型态
改为：ReDim preserve a(i)

什么时候都不可以加!~~

热心网友时间：2023-10-16 18:08

改成

ReDim Preserve a(i)‘否则前面的赋值数据会丢失

什麼情况下都不可以在redim後面加上as type 这是vb规定的

热心网友时间：2023-10-16 18:08

ReDim Preserve a(i)
要加上 preserve ,否则重新定义数组后，数组元素将被初始化。