这段代码返回的是什么东西？大家试验一下

Question

添加一个按钮，一个listbox    C:\windows随便改...Private Sub Command1_Click()
Dim wstar, fff,i
Set wstar = CreateObject("Shell.Application")
fff = wstar.namespace("C:\windows").Items()
For i = 0 To 10
List1.AddItem (fff.Item(i))
Next i
End Sub

Answer 1

打开(&O)
打印(&P)
Convert to Ado&be PDF添加到档案文件(&A)
添加到(&T)"WINDOWS.rar"
压缩并邮寄...
压缩到"WINDOWS.rar"并邮寄剪切(&T)
复制(&C)