VB.net如何删除数组内元素

Question

'这是文本框里----------------
Private Sub TextBox2_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox2.KeyUp
If (e.KeyCode = 13) Then
x = Val(TextBox1.Text)
y = Val(TextBox2.Text)
z = x * y
TextBox3.Text = z

ListBox1.Items.Add("每项结果：" & z)

GTnumstr(I) = TextBox3.Text
GTresult = GTresult + GTnumstr(I)

'按钮----------------------------
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
TextBox3.Text = GTresult

ListBox1.Items.Add("-------------------")
ListBox1.Items.Add("本张单总额：" & GTresult)
ListBox1.Items.Add("-------------------")

问题来了，当我下次再在文本框输入的数，进行计算。
那第一次的GTnumstr(I)数组内的元素。如何清空呢！！！！
问题如图：
正常是第二张单也是10的，但这明显是。第一次计算后。数组内的元素还在。。所以我想清除数组元素。
还有这里变量，我是全局的。姐通用。是否有应响！？
Dim x, y, z As Double 'x,y获取text1,2值，z计算结果
Dim GTnumstr(100) As Single '数组
Dim I As Integer '数组变量

Answer 1

删除数组元素很简单,重新声明数组即可，代码如下
Redim [Preserve] 数组名 (下标上界)
这个也可以称为动态数组，这个东西是基础，非常重要。
这个功能就等于说，把原来的数组重新声明，Preserve是可选项，他的意思就代表是否保留数组内容,这是重点，如果你想删除数组中的元素，就不要写Preserve，这个方法的控制性也很好，可以重新声明数组的元素，各个方面都很有用，希望采纳！谢谢！