Question

目的......

如何读取多个文件夹中的文件数量。

所以在程序中我应该添加和删除我想要监视的文件夹。所以我将文件夹添加到列表框中。 listbox最终会包含一些像\\server\parent directory\directory

这样的路径的项目

问题

现在一切正常，将指定路径作为项目添加到列表框中，但现在我想计算列表框中所有文件夹中的文件并将数字输出到文本框。

如果我有一个包含单个路径的文本框，我已经想出了如何做到这一点;

Dim counter = My.Computer.FileSystem.GetFiles(tbchannel1.Text)
    tbCount1.Text = ("" & CStr(counter.Count))

但是我无法弄清楚如何扭转它来处理列表框中的所有项目。

......顺便说一下，按下按钮就会发生这种情况。 Eventuelly我将连接一个button.performclick

的计时器

谢谢！

Answer 1

这应该为你做

Private Sub CountFilesButton_Click(sender As Object, e As EventArgs) Handles CountFilesButton.Click
    Try
        Dim fileTotal As Integer
        For Each item As String In DirListBox.Items
            fileTotal += My.Computer.FileSystem.GetFiles(item.ToString).Count
        Next
        FileCountLabel.Text = String.Format("File count: {0}", fileTotal.ToString)
    Catch ex As Exception
        MessageBox.Show(String.Concat("An error occurred ", ex.Message))
    End Try
End Sub

由您来验证路径是否存在并处理其他错误。

如何计算多个列表框项目中的文件

1 个答案: