VB.NET 如何将ListBox列表框的所有项复制到一个数组中，便于排序？谢谢解答

Posted 2023-03-11

VB.NET 如何将ListBox列表框的所有项复制到一个数组中，便于排序，或者listBox有没有自带的成员函数能动态表示项？谢谢解答！

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ListboxTotalItem As Integer = ListBox1.Items.Count - 1
Dim a(ListboxTotalItem) As String

For i As Integer = 0 To ListboxTotalItem
a(i) = i
Next

Label1.Text = a(5)
End Sub

End Class

-------------

一个Form1
一个Label1
一个Listbox1
一个Button1
在Listbox1中加入10个值

-------------

只是一个演示，其他的要靠自己。 参考技术A 你可以尝试这样做：
listbox1.items.add(mydatareader("id").tostring()+"—"+mydatareader("pid").tostring()+"—"+mydatareader("
name
").tostring())
窍门：把若干个字段拼接起来才可以显示在一个listbox中，同时希望listbox有足够的宽度。
显示样子可能是：
1—111—张三