读书人

大家看看这两段代码功能一样吗?该怎么

发布时间: 2011-12-27 22:22:55 作者: rapoo

大家看看这两段代码功能一样吗?
代码1:

for each name as string in my.computer.filsystem.getfiles _ (my.computer.filsystem.specialdirectories.mydocuments)
list.items.add(name) 'list是列表框

next
代码2:
for each name as string in my.computer.filsystem.getfiles _ (system.enviroment.getfolderpath _(system.enviroment.specialfolder.mydocuments))
list.items.add(name) 'list是列表框

第二个代码运行的时候没反映
但是这两个代码看起来功能一样啊!


[解决办法]
我试了一下,可以用啊,不过楼主拼错好多啊。
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
For Each name As String In My.Computer.FileSystem.GetFiles _
(System.Environment.GetFolderPath _
(System.Environment.SpecialFolder.MyDocuments))
ListBox1.Items.Add(name)
Next
End Sub

读书人网 >VB Dotnet

热点推荐