16,554
社区成员
发帖
与我相关
我的任务
分享
Dim array1() As String
Dim i As Integer = 0
ReDim array1(lstOne.Items.Count)
For i = 0 To lstOne.Items.Count - 1
array1(i) = lstOne.Items(i).ToString
Next