Private Sub Command Button 1_Click ()

T1! = Val (TextBox1.Text)

T2! = Val (TextBox2.Text)

T3! =T1!+T2!

Label1.Caption=CStr(T3!)

End Sub

 

где Val – функция, конвертирующая текстовую строку в число;

Cstr – функция, конвертирующая число в текстовую строку.

 

Варианты заданий

Варианты Содержание
1-5 Программа вычитание
6-10 Программа деления
11-15 Программа умножения

 

Практическая работа № 2

 

Тема: Простейшие формулы

Пример

Программа «Определение прибыли» производит вычисление прибыли от сдачи СМР (строительно-монтажных работ) по объекту № 1.

Прибыль Р определяется по формуле: P =S+K-C,

где S = 12450 р. − сметная стоимость СМР;

К = 1560 р. − компенсация заказчик;

С = 16280 р. − себестоимость СМР.

Интерфейс с пользователем реализован в виде формы UserForm 1 (Рисунок 2.1).

 

Рисунок 2.1 – Программа «Определение прибыли»

 

Величины S, K, C вводятся в окна TextBox1, TextBox2, TextBox3. Затем при нажатии кнопки «Вычислить» (щелчок кнопкой мыши) эти числа подставляют в формулу, а результат отображается на месте метки Label5.

Программа

VBA

Private Sub CommandButton1_Click()

S! =Val (TextBox1.Text)

K! =Val (TextBox2.Text)

C! =Val (TextBox3.Text)

P! =S!+K!-C!

Label5.Caption= CStr (P!)

End Sub


 


Варианты заданий

Вариант 1

Рассчитать объем павильона для трех значений высот и радиуса

H(м) 3 4 8
R(м) 5 7,5 15

Вариант 2

Определить коэффициент оборачиваемости средств К по трем СМУ при следующих исходных данных

Номер СМУ Сумма оборотных средств F (тыс. руб.) Объем работ Q (тыс. руб.)
1 2 3 500 300 500 2000 1500 2500

Вариант 3

Определить, сколько материала S (м2) потребуется на крышу цветочного павильона при следующих значениях исходных данных

R(м) h (м)
5 7 10 4 4 5

Вариант 4

Определить рентабельность R работы трех СМУ в процентах

При следующих данных

Номер СМУ Прибыль P (тыс. руб.) Объем работ Q (тыс. руб.)
1 2 3 600 400 800 2000 1500 2500

R=

 

Вариант 5

Определить объем зала цирка

V=

Для трех значений

H 5 6 7 m
R 40 42 50 m

 

Вариант 6

Определить производительность работ по трем СМУ при следующих исходных данных

Номер СМУ Число работающих N Объем работ (тыс. руб.)
1 2 3 120 80 140 2000 1500 2500

(тыс. руб.)

 

Вариант 7

Определить площадь S поверхности спортивного комплекса и его объем

S=2 R2

V=

Для трех значений R: R=15 m, 20 m, 25 m

 

Вариант 8

Определить фондоотдачу FO по трем СМУ при следующих исходных данных

 

Номер СМУ Средняя стоимость основных производственных фондов F(тыс. руб.) Объем работ Q(тыс. руб.)
1 2 3 450 300 620 2000 1500 2500

FO=

 

Вариант 9

Определить объем спортивного сооружения

V=4  для трех параметров

a 5 7 10м
b 15 18 25м
c 4 4

 

Вариант 10

Определить количество рабочих R, необходимых для выполнения СМР при следующих исходных данных

 

План СМР (руб.) Р Средняя выработка (руб.)   Количество раб. дней К
 

11850

22508

18974

30 45 60 20 22 23

 

Вариант 11

 

Вычислить объем элеватора

для трех значений R и r

R 20 15 25м
r 10 7 15м

 

Вариант 13

 

Определить, сколько материала пойдет на поверхность выставочного павильона

Для трех значений параметров:

a 15 25 28
b 10 18 22

 

Вариант 14

Определить рентабельность R отдачи СМР за год по трем объектам строительства при следующих исходных данных:

Прибыль (тыс. руб.) Р Стоимость (тыс. руб.) S
40 64 80 500 800 1000

 

Вариант 15

Определить объем складского помещения для тех значений R, L, H

R 5 7 8 m
L 15 20 22 m
H 3 3 3,5 m

V=pR^2L/2+2HLR

 

 

Практическая работа № 3

 





Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: