Найти сумму членов последовательности, расположенных между ее максимальным и минимальным значениями - VB

Формулировка задачи:

Дана последовательность из n различных чисел. Найти сумму ее членов, расположенных между максимальным и минимальным значениями ( в сумму включить оба этих числа) в visual basic. Помогите пожалуйста с:

Дано простое число , составить функцию , которая будет находить следующее за ним простое число в visual basic. Еще с этой помогите пожалуйста если можете я полный дуб :сс

напишите программу анализа значений температуры больного за сутки : определите минимальное и максимальное значение, среднее арифметическое. Замеры температуры производятся шесть раз в сутки и результаты вводятся с клавиатуры в массив Т. в Visual basic важе ужс(((

Решение задачи: «Найти сумму членов последовательности, расположенных между ее максимальным и минимальным значениями»

textual
                            Листинг программы 
                        

                            Function NextPrime(P As Long) As Long
    i& = P + 2
    Do
        s% = 0
        For j& = 3 To i& \ 2 Step 2
            If i& Mod j& = 0 Then
               s% = -1
               Exit For
            End If
        Next j&
        If s% = 0 Then
           NextPrime = i&
           Exit Function
        End If
        i& = i& + 2
    Loop
End Function
                        