Module Module1
    Public Sub menor4()
        With Form2
            .IndexPregunta(1) = 1
            .IndexPregunta(2) = 11
            .IndexPregunta(3) = 25
            .IndexPregunta(4) = 35
            .IndexPregunta(5) = 55
            .IndexPregunta(6) = 41
            .IndexPregunta(7) = 17
            .IndexPregunta(8) = 69
            .IndexPregunta(9) = 29
            .IndexPregunta(10) = 71
            .IndexPregunta(11) = 19
            .IndexPregunta(12) = 31
            .IndexPregunta(13) = 57
            .IndexPregunta(14) = 63
            .IndexPregunta(15) = 39
            .IndexPregunta(16) = 47
            .IndexPregunta(17) = 65
            .IndexPregunta(18) = 9
            .IndexPregunta(19) = 77
            .IndexPregunta(20) = 55
        End With
    End Sub
    Public Sub menor11()
        With Form2
            .IndexPregunta(1) = 19 '
            .IndexPregunta(2) = 21 '
            .IndexPregunta(3) = 31 '
            .IndexPregunta(4) = 57 '
            .IndexPregunta(5) = 5 '
            .IndexPregunta(6) = 13 '
            .IndexPregunta(7) = 63 '
            .IndexPregunta(8) = 77 '
            .IndexPregunta(9) = 27 '
            .IndexPregunta(10) = 39 '
            .IndexPregunta(11) = 79
            .IndexPregunta(12) = 23
            .IndexPregunta(13) = 11
            .IndexPregunta(14) = 47
            .IndexPregunta(15) = 25
            .IndexPregunta(16) = 23
            .IndexPregunta(17) = 15
            .IndexPregunta(18) = 61
            .IndexPregunta(19) = 53
            .IndexPregunta(20) = 75
        End With
    End Sub
    Public Sub menor16()
        With Form2
            .IndexPregunta(1) = 23 '
            .IndexPregunta(2) = 65 '
            .IndexPregunta(3) = 7 '
            .IndexPregunta(4) = 25 '
            .IndexPregunta(5) = 15 '
            .IndexPregunta(6) = 37 '
            .IndexPregunta(7) = 79 '
            .IndexPregunta(8) = 51 '
            .IndexPregunta(9) = 11 '
            .IndexPregunta(10) = 47 '
            .IndexPregunta(11) = 9
            .IndexPregunta(12) = 73
            .IndexPregunta(13) = 27
            .IndexPregunta(14) = 43
            .IndexPregunta(15) = 21
            .IndexPregunta(16) = 75
            .IndexPregunta(17) = 17
            .IndexPregunta(18) = 49
            .IndexPregunta(19) = 29
            .IndexPregunta(20) = 61
        End With
    End Sub
    Public Sub menor21()
        With Form2
            .IndexPregunta(1) = 21 '
            .IndexPregunta(2) = 27 '
            .IndexPregunta(3) = 53 '
            .IndexPregunta(4) = 67 '
            .IndexPregunta(5) = 43 '
            .IndexPregunta(6) = 19 '
            .IndexPregunta(7) = 17 '
            .IndexPregunta(8) = 9 '
            .IndexPregunta(9) = 45 '
            .IndexPregunta(10) = 73 '
            .IndexPregunta(11) = 61
            .IndexPregunta(12) = 33
            .IndexPregunta(13) = 29
            .IndexPregunta(14) = 75
            .IndexPregunta(15) = 15
            .IndexPregunta(16) = 65
            .IndexPregunta(17) = 35
            .IndexPregunta(18) = 47
            .IndexPregunta(19) = 25
            .IndexPregunta(20) = 13
        End With
    End Sub
    Public Sub menor26()
        With Form2
            .IndexPregunta(1) = 75 '
            .IndexPregunta(2) = 23 '
            .IndexPregunta(3) = 59 '
            .IndexPregunta(4) = 13 '
            .IndexPregunta(5) = 3 '
            .IndexPregunta(6) = 49 '
            .IndexPregunta(7) = 61 '
            .IndexPregunta(8) = 33 '
            .IndexPregunta(9) = 15 '
            .IndexPregunta(10) = 29 '
            .IndexPregunta(11) = 27
            .IndexPregunta(12) = 1
            .IndexPregunta(13) = 53
            .IndexPregunta(14) = 19
            .IndexPregunta(15) = 31
            .IndexPregunta(16) = 65
            .IndexPregunta(17) = 77
            .IndexPregunta(18) = 17
            .IndexPregunta(19) = 47
            .IndexPregunta(20) = 27
        End With
    End Sub
    Public Sub menor31()
        With Form2
            .IndexPregunta(1) = 65 '
            .IndexPregunta(2) = 19 '
            .IndexPregunta(3) = 33 '
            .IndexPregunta(4) = 23 '
            .IndexPregunta(5) = 77 '
            .IndexPregunta(6) = 27 '
            .IndexPregunta(7) = 11 '
            .IndexPregunta(8) = 1 '
            .IndexPregunta(9) = 45 '
            .IndexPregunta(10) = 53 '
            .IndexPregunta(11) = 73
            .IndexPregunta(12) = 9
            .IndexPregunta(13) = 15
            .IndexPregunta(14) = 47
            .IndexPregunta(15) = 29
            .IndexPregunta(16) = 3
            .IndexPregunta(17) = 49
            .IndexPregunta(18) = 21
            .IndexPregunta(19) = 7
            .IndexPregunta(20) = 73
        End With
    End Sub
    Public Sub menor36()
        With Form2
            .IndexPregunta(1) = 9 '
            .IndexPregunta(2) = 39 '
            .IndexPregunta(3) = 21 '
            .IndexPregunta(4) = 63 '
            .IndexPregunta(5) = 29 '
            .IndexPregunta(6) = 15 '
            .IndexPregunta(7) = 47 '
            .IndexPregunta(8) = 57 '
            .IndexPregunta(9) = 19 '
            .IndexPregunta(10) = 73 '
            .IndexPregunta(11) = 21
            .IndexPregunta(12) = 3
            .IndexPregunta(13) = 35
            .IndexPregunta(14) = 11
            .IndexPregunta(15) = 67
            .IndexPregunta(16) = 1
            .IndexPregunta(17) = 25
            .IndexPregunta(18) = 37
            .IndexPregunta(19) = 43
            .IndexPregunta(20) = 13
        End With
    End Sub
    Public Sub menor41()
        With Form2
            .IndexPregunta(1) = 13 '
            .IndexPregunta(2) = 51 '
            .IndexPregunta(3) = 41 '
            .IndexPregunta(4) = 3 '
            .IndexPregunta(5) = 25 '
            .IndexPregunta(6) = 11 '
            .IndexPregunta(7) = 35 '
            .IndexPregunta(8) = 67 '
            .IndexPregunta(9) = 75 '
            .IndexPregunta(10) = 21 '
            .IndexPregunta(11) = 31
            .IndexPregunta(12) = 5
            .IndexPregunta(13) = 17
            .IndexPregunta(14) = 27
            .IndexPregunta(15) = 49
            .IndexPregunta(16) = 29
            .IndexPregunta(17) = 73
            .IndexPregunta(18) = 9
            .IndexPregunta(19) = 15
            .IndexPregunta(20) = 9
        End With
    End Sub
    Public Sub menor46()
        With Form2
            .IndexPregunta(1) = 5 '
            .IndexPregunta(2) = 59 '
            .IndexPregunta(3) = 23 '
            .IndexPregunta(4) = 49 '
            .IndexPregunta(5) = 27 '
            .IndexPregunta(6) = 15 '
            .IndexPregunta(7) = 71 '
            .IndexPregunta(8) = 31 '
            .IndexPregunta(9) = 61 '
            .IndexPregunta(10) = 17 '
            .IndexPregunta(11) = 37
            .IndexPregunta(12) = 19
            .IndexPregunta(13) = 43
            .IndexPregunta(14) = 29
            .IndexPregunta(15) = 55
            .IndexPregunta(16) = 23
            .IndexPregunta(17) = 3
            .IndexPregunta(18) = 41
            .IndexPregunta(19) = 19
            .IndexPregunta(20) = 21
        End With
    End Sub
    Public Sub menor51()
        With Form2
            .IndexPregunta(1) = 43 '
            .IndexPregunta(2) = 25 '
            .IndexPregunta(3) = 17 '
            .IndexPregunta(4) = 79 '
            .IndexPregunta(5) = 55 '
            .IndexPregunta(6) = 13 '
            .IndexPregunta(7) = 7 '
            .IndexPregunta(8) = 69 '
            .IndexPregunta(9) = 29 '
            .IndexPregunta(10) = 37 '
            .IndexPregunta(11) = 25
            .IndexPregunta(12) = 17
            .IndexPregunta(13) = 31
            .IndexPregunta(14) = 29
            .IndexPregunta(15) = 11
            .IndexPregunta(16) = 47
            .IndexPregunta(17) = 15
            .IndexPregunta(18) = 59
            .IndexPregunta(19) = 39
            .IndexPregunta(20) = 21
        End With
    End Sub
    Public Sub menor56()
        With Form2
            .IndexPregunta(1) = 25 '
            .IndexPregunta(2) = 11 '
            .IndexPregunta(3) = 55 '
            .IndexPregunta(4) = 17 '
            .IndexPregunta(5) = 63 '
            .IndexPregunta(6) = 31 '
            .IndexPregunta(7) = 39 '
            .IndexPregunta(8) = 5 '
            .IndexPregunta(9) = 29 '
            .IndexPregunta(10) = 75
            .IndexPregunta(11) = 61
            .IndexPregunta(12) = 77
            .IndexPregunta(13) = 7
            .IndexPregunta(14) = 23
            .IndexPregunta(15) = 53
            .IndexPregunta(16) = 13
            .IndexPregunta(17) = 47
            .IndexPregunta(18) = 19
            .IndexPregunta(19) = 3
            .IndexPregunta(20) = 15
        End With
    End Sub
    Public Sub menor61()
        With Form2
            .IndexPregunta(1) = 27 '
            .IndexPregunta(2) = 61 '
            .IndexPregunta(3) = 7 '
            .IndexPregunta(4) = 49 '
            .IndexPregunta(5) = 23 '
            .IndexPregunta(6) = 53 '
            .IndexPregunta(7) = 15 '
            .IndexPregunta(8) = 37 '
            .IndexPregunta(9) = 19 '
            .IndexPregunta(10) = 77 '
            .IndexPregunta(11) = 1
            .IndexPregunta(12) = 35
            .IndexPregunta(13) = 17
            .IndexPregunta(14) = 71
            .IndexPregunta(15) = 69
            .IndexPregunta(16) = 71
            .IndexPregunta(17) = 25
            .IndexPregunta(18) = 57
            .IndexPregunta(19) = 3
            .IndexPregunta(20) = 31
        End With
    End Sub
End Module