PageRenderTime 29ms CodeModel.GetById 25ms app.highlight 2ms RepoModel.GetById 1ms app.codeStats 0ms

/Source Code/FileArchive/EntryData.vb

#
Visual Basic | 17 lines | 12 code | 5 blank | 0 comment | 0 complexity | c1ced6aa0086c4953d87bf3141d6d9e8 MD5 | raw file
 1Friend Class EntryData
 2
 3    Friend FileName As String
 4    Friend VirtualFileName As String
 5    Friend Position As Integer
 6
 7    Public Sub New(ByVal fileName As String, _
 8                   ByVal virtualFileName As String, _
 9                   Optional ByVal position As Integer = 0)
10
11        Me.FileName = fileName
12        Me.VirtualFileName = virtualFileName
13        Me.Position = position
14
15    End Sub
16
17End Class