如何将静态数组转换到动态数组?
dim a() as integer
redim a(1 to 2)
?????
问题点数:100、回复次数:8Top
1 楼smilejiangjun(smile将军)回复于 2002-11-27 12:37:44 得分 0
这样不对吗?Top
2 楼holydiablo(香菜鱼头)回复于 2002-11-27 12:40:34 得分 0
dim a() as integer
redim a(2)
如果要保留原值
redim Preserve a(2)
Top
3 楼holydiablo(香菜鱼头)回复于 2002-11-27 12:42:21 得分 0
dim a() as integer
redim a(1 to 2)
也是对的,怎么了Top
4 楼antshome(我好累)回复于 2002-11-27 12:48:42 得分 0
是这样的
有一个数组a,只有一个元素a(1),现在需要移除这个元素,就象a()一样,
Top
5 楼fonddream(我来自广州)回复于 2002-11-27 12:59:52 得分 0
直接把0或空值赋给该元素不就得了?Top
6 楼antshome(我好累)回复于 2002-11-27 13:13:13 得分 0
楼上的
是移除,不是清空Top
7 楼zyl910(编程的乐趣在于编程控制硬件,与用图形学实现绚丽效果)回复于 2002-11-27 13:17:39 得分 100
Erase 语句
重新初始化大小固定的数组的元素,以及释放动态数组的存储空间。
语法
Erase arraylist
所需的 arraylist 参数是一个或多个用逗号隔开的需要清除的数组变量。
说明
Erase 根据是固定大小(常规的)数组还是动态数组,来采取完全不同的行为。Erase 无需为固定大小的数组恢复内存。Erase 按下表来设置固定数组的元素:
数组类型 Erase 对固定数组元素的影响
固定数值数组 将每个元素设为 0。
固定字符串数组(长度可变) 将每个元素设为零长度字符串 ("")。
固定字符串数组(长度固定) 将每个元素设为 0。
固定 Variant 数组 将每个元素设为 Empty。
用户定义类型的数组 将每个元素作为单独的变量来设置。
对象数组 将每个元素设为特定值 Nothing。
Erase 释放动态数组所使用的内存。在下次引用该动态数组之前,程序必须使用 ReDim 语句来重新定义该数组变量的维数。
Erase 语句示例
该示例使用 Erase 语句重新初始化固定大小的数组中的元素,以及释放动态数组存储空间。
'声明数组变量。
Dim NumArray(10) As Integer ' Integer 数组。
Dim StrVarArray(10) As String '变长的 String 数组。
Dim StrFixArray(10) As String * 10 '定长的 String 数组。
Dim VarArray(10) As Variant 'Variant 数组。
Dim DynamicArray() As Integer '动态数组。
ReDim DynamicArray(10) '分配存储空间。
Erase NumArray '将每个元素设为 0。
Erase StrVarArray '将每个元素设为
'零长度字符串 ("")。
Erase StrFixArray '将每个元素设为 0。
Erase VarArray '将每个元素设为 Empty。
Erase DynamicArray '释放数组所用内存。
Top
8 楼smilejiangjun(smile将军)回复于 2002-11-30 21:19:08 得分 0
eraseTop




