从列表框 vb.net 复制文件和文件夹答案

【问题标题】：Copying over both files and folders from a listbox vb.net从列表框 vb.net 复制文件和文件夹
【发布时间】：2016-01-22 00:17:44
【问题描述】：

我已经有了可以复制列表框中列出的任何文件的代码，但我只需要有关如何调整它以复制目录的帮助。

例如。列表框的

Z:\Test\TestFile.exe
Z:\Test\TestFolder

这是我到目前为止的代码......提前谢谢你

For Each item As String In FilesList.Items
    Try
        If IO.File.Exists(item) Then
        My.Computer.FileSystem.CopyFile(item, 
                 FolderChosenText.Text & "\" & IO.Path.GetFileName(item))
        End If
    Catch ex As Exception
        MessageBox.Show(ex.Message)
    End Try
Next

【问题讨论】：

查看 this 和/或 this 和/或 this 或来自您朋友 Google 的其他 28,000 名中的任何一个

标签： vb.net listbox

【解决方案1】：

您必须使用与文件相同的逻辑，而不是复制文件将其更改为复制目录。下面是代码：

            If IO.Directory.Exists(item) Then
                My.Computer.FileSystem.CopyDirectory(item,
                FolderChosenText.Text & "\" & IO.Path.GetFileName(item))
            End If

【讨论】：

太棒了，太容易了。谢谢您的帮助。现在有没有一种简单的方法可以使用进度条来跟踪流程？对不起我的无知

【解决方案2】：

您必须为进度条控件分配最小值和最大值。例如：0 作为最小值，您在 ListBox 中拥有的项目总数作为最大值。在一个循环中，进度条值将增加一，直到达到最大值。下面是代码：

            ProgressBar1.Minimum = 0
            ProgressBar1.Maximum = FilesList.Items.Count - 1

            For i = 0 To FilesList.Items.Count - 1
                ProgressBar1.Value = i
            Next

【讨论】：