'LOADING THE VALUES, JERK
        Dim mc As FileInfo = New FileInfo("mcdata")
        Dim cb As FileInfo = New FileInfo("cbdata")
        Dim mcFileText As String = mc.OpenText.ReadToEnd
        Dim mcLines() As String = mcFileText.Split(ControlChars.Lf)
        Dim cbFileText As String = cb.OpenText.ReadToEnd
        Dim cbLines() As String = cbFileText.Split(ControlChars.Lf)
        Dim mcline As String
        Dim mclineNumber As Integer
        mclineNumber = -1
        For Each mcline In mcLines
            mclineNumber = mclineNumber + 1
            Dim mcLineParameters() As String = mcline.Split(":")
            mcQuestionDescription(mclineNumber) = mcLineParameters(0)
            mcQuestionText(mclineNumber) = mcLineParameters(1)
            mcQuestionAnswer(mclineNumber) = mcLineParameters(2)
            mcQuestionOptions(mclineNumber, 1) = mcLineParameters(3)
            mcQuestionOptions(mclineNumber, 2) = mcLineParameters(4)
            mcQuestionOptions(mclineNumber, 3) = mcLineParameters(5)
            mcQuestionOptions(mclineNumber, 4) = mcLineParameters(6)
            mcQuestionOptions(mclineNumber, 5) = mcLineParameters(7)
            mcQuestionPreImage(mclineNumber) = mcLineParameters(8)
            mcQuestionPostImage(mclineNumber) = mcLineParameters(9)
            mcQuestionCategory(mclineNumber) = mcLineParameters(10)
        Next

        Dim cbline As String
        Dim cblineNumber As Integer
        cblineNumber = -1
        For Each cbline In cbLines
            cblineNumber = cblineNumber + 1

            Dim cbLineParameters() As String = cbline.Split(":")

            cbPatientHistory(cblineNumber)
            cbPatientItems(cblineNumber)
            cbQuestionDescription(cblineNumber, 1)
            cbQuestionDescription(cblineNumber, 2)
            cbQuestionDescription(cblineNumber, 3)
            cbQuestionDescription(cblineNumber, 4)
            cbQuestionDescription(cblineNumber, 5)
            cbQuestionText(cblineNumber, 1)
            cbQuestionText(cblineNumber, 2)
            cbQuestionText(cblineNumber, 3)
            cbQuestionText(cblineNumber, 4)
            cbQuestionText(cblineNumber, 5)
            cbQuestionOptions(cblineNumber, 1, 1)
            cbQuestionOptions(cblineNumber, 1, 2)
            cbQuestionOptions(cblineNumber, 1, 3)
            cbQuestionOptions(cblineNumber, 1, 4)
            cbQuestionOptions(cblineNumber, 1, 5)
            cbQuestionOptions(cblineNumber, 2, 1)
            cbQuestionOptions(cblineNumber, 2, 2)
            cbQuestionOptions(cblineNumber, 2, 3)
            cbQuestionOptions(cblineNumber, 2, 4)
            cbQuestionOptions(cblineNumber, 2, 5)
            cbQuestionOptions(cblineNumber, 3, 1)
            cbQuestionOptions(cblineNumber, 3, 2)
            cbQuestionOptions(cblineNumber, 3, 3)
            cbQuestionOptions(cblineNumber, 3, 4)
            cbQuestionOptions(cblineNumber, 3, 5)
            cbQuestionOptions(cblineNumber, 4, 1)
            cbQuestionOptions(cblineNumber, 4, 2)
            cbQuestionOptions(cblineNumber, 4, 3)
            cbQuestionOptions(cblineNumber, 4, 4)
            cbQuestionOptions(cblineNumber, 4, 5)
            cbQuestionOptions(cblineNumber, 5, 1)
            cbQuestionOptions(cblineNumber, 5, 2)
            cbQuestionOptions(cblineNumber, 5, 3)
            cbQuestionOptions(cblineNumber, 5, 4)
            cbQuestionOptions(cblineNumber, 5, 5)
            cbQuestionOptions(cblineNumber, 1, 1)
            cbQuestionOptions(cblineNumber, 1, 2)
            cbQuestionOptions(cblineNumber, 1, 3)
            cbQuestionOptions(cblineNumber, 1, 4)
            cbQuestionOptions(cblineNumber, 1, 5)
            cbQuestionOptions(cblineNumber, 2, 1)
            cbQuestionOptions(cblineNumber, 2, 2)
            cbQuestionOptions(cblineNumber, 2, 3)
            cbQuestionOptions(cblineNumber, 2, 4)
            cbQuestionOptions(cblineNumber, 2, 5)
            cbQuestionOptions(cblineNumber, 3, 1)
            cbQuestionOptions(cblineNumber, 3, 2)
            cbQuestionOptions(cblineNumber, 3, 3)
            cbQuestionOptions(cblineNumber, 3, 4)
            cbQuestionOptions(cblineNumber, 3, 5)
            cbQuestionOptions(cblineNumber, 4, 1)
            cbQuestionOptions(cblineNumber, 4, 2)
            cbQuestionOptions(cblineNumber, 4, 3)
            cbQuestionOptions(cblineNumber, 4, 4)
            cbQuestionOptions(cblineNumber, 4, 5)
            cbQuestionOptions(cblineNumber, 5, 1)
            cbQuestionOptions(cblineNumber, 5, 2)
            cbQuestionOptions(cblineNumber, 5, 3)
            cbQuestionOptions(cblineNumber, 5, 4)
            cbQuestionOptions(cblineNumber, 5, 5)
            cbQuestionAnswer(cblineNumber, 1, 1)
            cbQuestionAnswer(cblineNumber, 1, 2)
            cbQuestionAnswer(cblineNumber, 1, 3)
            cbQuestionAnswer(cblineNumber, 1, 4)
            cbQuestionAnswer(cblineNumber, 1, 5)
            cbQuestionAnswer(cblineNumber, 2, 1)
            cbQuestionAnswer(cblineNumber, 2, 2)
            cbQuestionAnswer(cblineNumber, 2, 3)
            cbQuestionAnswer(cblineNumber, 2, 4)
            cbQuestionAnswer(cblineNumber, 2, 5)
            cbQuestionAnswer(cblineNumber, 3, 1)
            cbQuestionAnswer(cblineNumber, 3, 2)
            cbQuestionAnswer(cblineNumber, 3, 3)
            cbQuestionAnswer(cblineNumber, 3, 4)
            cbQuestionAnswer(cblineNumber, 3, 5)
            cbQuestionAnswer(cblineNumber, 4, 1)
            cbQuestionAnswer(cblineNumber, 4, 2)
            cbQuestionAnswer(cblineNumber, 4, 3)
            cbQuestionAnswer(cblineNumber, 4, 4)
            cbQuestionAnswer(cblineNumber, 4, 5)
            cbQuestionAnswer(cblineNumber, 5, 1)
            cbQuestionAnswer(cblineNumber, 5, 2)
            cbQuestionAnswer(cblineNumber, 5, 3)
            cbQuestionAnswer(cblineNumber, 5, 4)
            cbQuestionAnswer(cblineNumber, 5, 5)
            cbQuestionPreImage(cblineNumber, 1)
            cbQuestionPreImage(cblineNumber, 2)
            cbQuestionPreImage(cblineNumber, 3)
            cbQuestionPreImage(cblineNumber, 4)
            cbQuestionPreImage(cblineNumber, 5)
            cbQuestionPostImage(cblineNumber, 1)
            cbQuestionPostImage(cblineNumber, 2)
            cbQuestionPostImage(cblineNumber, 3)
            cbQuestionPostImage(cblineNumber, 4)
            cbQuestionPostImage(cblineNumber, 5)

            'mcQuestionDescription(mclineNumber) = cbLineParameters(0)
            'mcQuestionText(mclineNumber) = cbLineParameters(1)
            'mcQuestionAnswer(mclineNumber) = cbLineParameters(2)
            'mcQuestionOptions(mclineNumber, 1) = cbLineParameters(3)
            'mcQuestionOptions(mclineNumber, 2) = cbLineParameters(4)
            'mcQuestionOptions(mclineNumber, 3) = cbLineParameters(5)
            'mcQuestionOptions(mclineNumber, 4) = cbLineParameters(6)
            'mcQuestionOptions(mclineNumber, 5) = cbLineParameters(7)
            'mcQuestionPreImage(mclineNumber) = cbLineParameters(8)
            'mcQuestionPostImage(mclineNumber) = cbLineParameters(9)
            'mcQuestionCategory(mclineNumber) = cbLineParameters(10)
        Next
        'END LOADING THE VALUES.