[求助] 急用 怎么把listbox中的内容赋值给一个数组
怎么把listbox中的内容赋值给一个数组
回复:(huang_yu)[求助] 急用 怎么把listbox中的内...
Dim MyArray() As Double, i As Integer
With List1
ReDim MyArray(1 To .ListCount)
For i = 1 To .ListCount
MyArray(i) = .List(i - 1)
Next
End With