Ich erstelle eine Liste von Ordnern, in denen jeder Ordner nur wenige Eigenschaften benötigt. Daher verwende ich die unten stehende Klasse. Es spielt jedoch keine Rolle, in welchem ​​Ordner sich dieFilesInFolder Eigenschaft ist immer 5 mehr als die tatsächliche Anzahl der Dateien im Ordner.

Kann mir bitte jemand helfen, herauszufinden, was los ist? Vielen Dank.

Public Class Single_Action_Folder

    Public ReadOnly FullName As String = ""
    Public ReadOnly Name As String = ""
    Public ReadOnly FilesInFolder As Integer = 0
    Public ReadOnly Exists As Boolean = False

    '**
    ' Constructor
    '*
    Public Sub New(Optional dir As DirectoryInfo = Nothing)

        ' First check that a directory has been specified
        If dir Is Nothing Then Exit Sub

        ' Populate the class properties
        FullName = dir.FullName
        Name = dir.Name
        FilesInFolder = dir.GetFiles().Count
        Exists = dir.Exists

    End Sub

End Class