Научная работа: Создание программного продукта на языке программирования Visual Basic for Applications

13

15

0,06

0,121

0,121

0,18

0,21

3

6

4

0

8

Приложение А

ЭКРАННЫЕ ФОРМЫ

Рисунок А.1 – Работа программы в MS Word

Рисунок А.2 – Пример работы программы в MS Word

Приложение Б

ЛИСТИНГ ПРОГРАММЫ В MS EXCEL

Sub Laba1()

Dim m, i, j, k As Integer

Dim sum As Double

Dim a(5, 5), b(10) As Long

For i = 1 To 5

For j = 1 To 5

a(i, j) = Cells(i, j)

Next j

Next i

sum = 0

For i = 1 To 5