删除数组元素很简单,重新声明数组即可，代码如下
兰坪网站制作公司哪家好，找创新互联公司！从网页设计、网站建设、微信开发、APP开发、响应式网站开发等网站项目制作，到程序开发，运营维护。创新互联公司于2013年开始到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选创新互联公司。
Redim [Preserve] 数组名 (下标上界)
这个也可以称为动态数组，这个东西是基础，非常重要。
这个功能就等于说，把原来的数组重新声明，Preserve是可选项，他的意思就代表是否保留数组内容,这是重点，如果你想删除数组中的元素，就不要写Preserve，这个方法的控制性也很好，可以重新声明数组的元素，各个方面都很有用，希望采纳！谢谢！
一、ReDim Array[数组名]()
二、局部变量只在该过程中有用，过程消失，释放地址空间
如果不要原来的数据，直接Redim a（199）
，所有数据清空，如果需要保留原来的数据，加上关键字preserve redim a（199）
，则保留原来数据，如此定义，不会造成内存泄露的
Erase 数组名
要注意，如果是固定数组，则所有元素的值被初始化（字符型为空字符串，数值型为0），数组的大小是不变的；如果是动态数组，则所有元素被删除，内存空间被回收，要重新ReDim才能使用。Private Sub Form_Click()Dim a(9) As Integer, i As IntegerRandomizePrint "清除前："For i = 0 To 9 a(i) = Rnd * 100 Print a(i);NextPrintErase aPrint "清除后"For i = 0 To 9 Print a(i);NextPrintEnd Sub
