首先，我只想说，我在vb.net一个初学者，只是一般的编码。 如果可能的话，我们的教授可能是为了供我们使用可能的最简单的方法，所以，请不要认为做什么，我试图做的花哨和抽象方法。 谢谢 ：）
所以我有一个列表框。 还有的项目没有定数。 因为我想我可以进入尽可能多的数字，我想在该列表框中所有文件转换成一个数组但很明显，你看不到一个数组。 所以我做了它，使它打印出自己的标签。 但是，只有输入到列表框中的最后一个数字就出来了。
我对获得列表框到一个数组的代码是这样的：
Dim i As Integer
For i = 0 To lstbxInput.Items.Count
dblarray(i) = CDbl(lstbxInput.Items(i))
Next i
而在这个子，dblarray为双被用作参考参数。
并打印出数组，我用这个代码：
Dim DblArray(lstbxInput.Items.Count - 1) As Double
getNumbers(DblArray)
lblLrgAns.Text = DblArray(lstbxInput.Items.Count - 1).ToString
我不完全理解按地址，希望我用正确的方式。 我用变灰dblarray那里，因为那是什么，教授告诉我们做的。
根据您在下面的代码，你得到了数组（ DblArray ）你想要什么
Dim DblArray(lstbxInput.Items.Count - 1) As Double
getNumbers(DblArray)
现在关于你的问题：
但是，只有输入到列表框中的最后一个数字就出来了。
这是因为这句法
lblLrgAns.Text = DblArray(lstbxInput.Items.Count - 1).ToString
你只需要的最后一个项目DblArray ，这是DblArray(lstbxInput.Items.Count - 1) 你需要得到的是DblArray(0)第一项）， DblArray(1)第二项）， DblArray(2)第三项），...，直到DblArray(lstbxInput.Items.Count - 1)最后一项）。 假设你要分配所有的DblArray项目lblLrgAns.Text用逗号隔开，你需要象下面这样一个循环
Dim i As Integer
For i = 0 To DblArray.Length - 1
lblLrgAns.Text = lblLrgAns.Text & DblArray(i).ToString
' add a comma unless it's the last index
If (i < DblArray.Length - 1)
lblLrgAns.Text = lblLrgAns.Text & ", "
End If
Next i
