.NET (Core and Framework)

Imports System.IO<br />
Public Class ProjectFile<br />
    Private _path As String<br />
    Private fi As FileInfo<br />
    Private _Name As String<br />
    Private _DirectoryName As String<br />
    Private _Extension As String<br />
    Private _Attributes As String<br />
    Private _CreationTime As Date<br />
    Private _LastAccessTime As Date<br />
    Private _LastWriteTime As Date<br />
    Private _Length As Long<br />
    Private _FullName As String<br />
    Public Sub New(ByVal path As String)<br />
        _path = path<br />
        fi = New FileInfo(_path)<br />
        _Name = fi.Name<br />
        _DirectoryName = fi.DirectoryName<br />
        _Extension = fi.Extension<br />
        _Attributes = fi.Attributes.ToString()<br />
        _CreationTime = fi.CreationTime<br />
        _LastAccessTime = fi.LastAccessTime<br />
        _LastWriteTime = fi.LastWriteTime<br />
        _Length = fi.Length<br />
        _FullName = fi.FullName<br />
    End Sub<br />
    Public ReadOnly Property FullName() As String<br />
        Get<br />
            Return _FullName<br />
        End Get<br />
    End Property<br />
    Public ReadOnly Property Length() As Long<br />
        Get<br />
            Return _Length<br />
        End Get<br />
    End Property<br />
    Public ReadOnly Property Path() As String<br />
        Get<br />
            Return _path<br />
        End Get<br />
    End Property<br />
    Public ReadOnly Property Name() As String<br />
        Get<br />
            Return _Name<br />
        End Get<br />
    End Property<br />
    Public ReadOnly Property DirectoryName() As String<br />
        Get<br />
            Return _DirectoryName<br />
        End Get<br />
    End Property<br />
    Public ReadOnly Property Extension() As String<br />
        Get<br />
            Return _Extension.ToLower<br />
        End Get<br />
    End Property<br />
    Public ReadOnly Property Attributes() As String<br />
        Get<br />
            Return _Attributes<br />
        End Get<br />
    End Property<br />
    Public ReadOnly Property CreationTime() As Date<br />
        Get<br />
            Return _CreationTime<br />
        End Get<br />
    End Property<br />
    Public ReadOnly Property LastAccessTime() As Date<br />
        Get<br />
            Return _LastAccessTime<br />
        End Get<br />
    End Property<br />
    Public ReadOnly Property LastWriteTime() As Date<br />
        Get<br />
            Return _LastWriteTime<br />
        End Get<br />
    End Property<br />
End Class