Here's a basic shell.
You'll need to build around it, but this is the foundation for you to work from.
Using src As New SqlCommand("SELECT * FROM Admissions WHERE FolderNumber = @FolderNumber",DBCon)
src.Parameters.AddwithValue("FolderNumber",txtFolder.Text)
DBCon.Open
Using rd = src.ExecuteReader
Do While rd.Read
Debug.Print(rd("FieldName"))
Loop
End Using
End Using