Пример работы с формой пользователя

Пусть имеется список группы, в котором содержатся сведения об оценках, полученных студентами во время сессии:

Требуется посчитать средний балл для конкретного студента, выбранного из списка.

На рабочем листе с помощью панели Элементы управления создадим кнопку с надписью «Средний балл».

Для выбора фамилии студента создадим форму, на ней комбинированный список ComboBox1, метку с надписью «Раскройте список, выберите фамилию, нажмите кнопку» в элементе управления Label1, командную кнопку с заголовком «Расчет среднего балла», текстовое поле TextBox1, куда будем выводить полученный результат, перед этим полем в метке Label2 сделана надпись «Средний балл».

Для кнопки «Средний балл», которая находится на рабочем листе Лист1, процедура может иметь следующий вид:

Sub CommandButton1_Click()

I=4

Do Until Worksheets(“Лист1”).Cells(I,1)=””

I=I+1

Loop

J=I-1

UserForm1.ComboBox1.RowSource = "Лист1!b4:b” & J

UserForm1.Show

End Sub

Здесь ”” означает пустую ячейку. В переменной J определяется номер последней заполненной строки в таблице. Затем с помощью метода RowSource заполняется комбинированный список ComboBox1 информацией из ячеек b4:bJ. С помощью метода Show форма вызывается на экран.

Процедура для кнопки «Расчет среднего балла»:

Sub CommandButton1_Click()

n = UserForm1.ComboBox1.ListIndex + 1

s = 0

For i = 1 To 4

b = Worksheets("Лист1").Cells(n + 3, i + 2).Value

s = s + b

Next

a = s / 4

UserForm1.TextBox1.Text = a

End Sub

В этой программе определяется номер выбранного элемента списка посредством свойства ListIndex, а затем высчитывается средний балл. Полученный результат помещается в текстовое окно TextBox1 на форме.

Лекция №12 Математический пакет Mathcad

В настоящее время для научно-технических расчетов на компьютерах все чаще и чаще используются не традиционные языки программирования и не электронные таблицы, а специальные математические программы типа Mathematica, MatLab, Maple, Mathcad, Gauss, Reduce, Eureka и др.

Математические пакеты, в особенности Mathcad — самый популярный пакет из вышеперечисленного списка, — позволяют специалистам в конкретной научно-технической области очень быстро освоить работу на компьютере и реализовать на них математические модели, не вдаваясь в тонкости программирования на традиционных языках (fortran, С, Pascal, BASIC и др.).

Данный пакет был разработан фирмой Math Soft Inс (USA).

В состав Mathcad входят несколько интегрированных между собой компонентов:

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

В Mathcad интерфейс пользователя интуитивен и сходен с другими приложениями Windows (рис. 1). Отметим его основные элементы:

верхнее меню, или строка меню (menu bar);
рабочая область (Worksheet);
панели инструментов (toolbars) Standard (Стандартная) и Formatting (Форматирование);
панель инструментов Math (Математика) и доступные через нее дополнительные математические палитры символов:

-общие арифметические операторы;