试图将元素添加到数组

时间:2009-12-04 04:28:46

标签: vb.net

使用3.5 VB1 framework.net

我正在尝试向数组添加元素

我想清除列表框并在列表框中显示数组内容。

然后添加另一个按钮,然后从文本框中向元素添加元素。

我在过去的6个小时里辛苦创造了这个

Call clearout()    ''===== Clears listbox
Dim MyNumbers(4) As Integer

Dim i As Integer

MyNumbers(0) = 1
MyNumbers(1) = 2
MyNumbers(2) = 3
MyNumbers(3) = 4
MyNumbers(4) = 5
For i = 0 To 4
    ListBox1.Items.Add(MyNumbers(i))
Next i

那部分效果很好!

将它直接放入列表框并删除列表框中的所有先前条目 所有这几个小时之后到目前为止我研究的是制作下一个按钮是使用UBound函数找到最高元素然后添加一个并使用该值重新调整它

问题是我不确定如何在第二个按钮

下正确写入

任何帮助?

1 个答案:

答案 0 :(得分:1)

我不太清楚你想要达到的目标,但这是我的解释:

Button1:
清除列表框
用数字1到5填充数组
用这些数字填充列表框

按钮2:
从文本框中向数组添加一个数字
将数组中的新数字添加到列表框中或者只是将数组中的值增加1并追加这个列表框的新值?

在任何情况下,您都需要在按钮之间共享数组,因此必须使用模块级范围声明它。也就是说,在按钮点击例程之外。
另外,为了保留数组中已有的值,你需要使用ReDim 保留 MyNumbers(newUBound)〓希望以上提示会有所帮助!

PS。你的clearout()方法是否只调用ListBox1.Items.Clear()?如果是这样,最好只是调用这个内联而不是创建一个新的方法来执行此操作。