Project 1 VB

Signed-off-by: Amrit Panesar <apanesar@4195tech.com>

COM350/Project1/Project1/MainForm.vb

@@ -16,6 +16,8 @@
     Public Sub RefreshData()
         ' MessageBox.Show("Do we halt here", "I dunno", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
         For Each foundFile As String In My.Computer.FileSystem.GetFiles(Options.Directory)
+
+        Next
     End Sub
 
 End Class

COM350/Project1/Project1/Options.vb

@@ -30,6 +30,13 @@
         End Set
     End Property
 
+    Public Files As List(Of FileData)
+    Sub AddFile(in as String)
+
+    End Sub
+
+
+
 
 
 End Module