Алгоритм расчета в пользовательской форме

Next

End If

‘ закрываем цикл, к счетчику добавляется шаг (у нас 1), проверяется, ‘не превышено ли конечное значение счетчика, если не превышено,

‘к сумме добавляется значение очередного элемента, если превышено, ‘выполняется оператор, записанный после инструкции Next.

‘ В ячейку с номером строки N+2, в столбец с номером 1 запишем

‘слово “Лидер”, в столбец с номером 2 запишем значение переменной ‘FMAX

Cells(N+2,1) = “Лидер”: Cells(N+2,2)=FMAX

‘ В ячейку с номером строки N+2, в столбец с номером 3 запишем значение ‘переменной OMAX, в столбец с номером 4 – значение переменной DMAX, в столбец с номером 5 – значение переменной VMAX

Cells(N+2,3) = OMAX: Cells(N+2,4)=DMAX: Cells(N+2,5)=VMAX

Алгоритм расчета рассмотрим на следующем примере. Создать пользовательскую форму, содержащую поля для ввода Фамилия работника, Тариф, Отработанное время. Необходимо создать программу для того, чтобы после ввода тарифа и отработанного времени автоматически рассчитывалась заработная плата по формуле тариф*время и выводилась в форму в соответствующей рамке.

Создадим пользовательскую форму, см. рис.9.

Рис.9. Пользовательская форма для ввода данных о работнике фирмы

В созданной форме три поля для ввода: TextBox1, TextBox2, TextBox3 и пять надписей: Label1 – Фамилия работника, Label2 – Тариф, Label3 – Отработанное время, Label4 – Зарплата и Label5. Содержимое (Caption) пятой надписи пока пусто.

Словесное описание алгоритма расчета зарплаты.

Если в поля ввода TextBox2 и TextBox3 введены числа, то присвоим переменной T содержимое поля ввода TextBox2, переменной V содержимое поля ввода TextBox3. Cодержимым надписи Label5 сделаем произведение переменных T и V.

Программное описание алгоритма

Rem проверяем, если в поля ввода TextBox2 и TextBox3 введены числа, то, переменной V содержимое поля ввода TextBox3.

Дата добавления: 2014-12-08