来给你写了个函数,拿去用,不谢
Function?RemoveAt(Of?T)(ByVal?arr?As?T(),?ByVal?index?As?Integer)?As?T()
Dim?uBound?=?arr.GetUpperBound(0)
Dim?lBound?=?arr.GetLowerBound(0)
Dim?arrLen?=?uBound?-?lBound
If?index?lBound?OrElse?index?uBound?Then
Throw?New?ArgumentOutOfRangeException(?_
String.Format("Index?must?be?from?{0}?to?{1}.",?lBound,?uBound))
Else
Dim?outArr(arrLen?-?1)?As?T
Array.Copy(arr,?0,?outArr,?0,?index)
Array.Copy(arr,?index?+?1,?outArr,?index,?uBound?-?index)
Return?outArr
End?If
End?Function
这不是你的错是VB的错,遇到这种情况,需重新定义一个数组,先保存pt的数据,然后将pt清空,再倒回来
删除数组元素很简单,重新声明数组即可,代码如下
Redim [Preserve] 数组名 (下标上界)
这个也可以称为动态数组,这个东西是基础,非常重要.
这个功能就等于说,把原来的数组重新声明,Preserve是可选项,他的意思就代表是否保留数组内容,这是重点,如果你想删除数组中的元素,就不要写Preserve,这个方法的控制性也很好,可以重新声明数组的元素,各个方面都很有用,希望采纳!谢谢!
Dim?i,?j?As?Integer
j?=?0
brr(j)?=?arr(i)
j?=?j?+?1
Next?i
Print?brr(i)
Erase 数组名
以上就是土嘎嘎小编为大家整理的vb.net清空一维数组相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!