rivate Sub Form_Load ()
Command2.Enabled = False 'Робить недоступною кнопку виведення сортованих даних
End Sub
В
Private Sub Option1_Click ()
MsgBox "Перейти до першій формі? "' Видає повідомлення
Form3.Hide 'Приховує 3 форму
Form1.Show 'Показує 1 форму
Command1.Enabled = True 'Робить доступною кнопку знаходження порівн. значень
Command2.Enabled = True 'Робить доступною кнопку запису в файл
End Sub
В
Private Sub Option2_Click ()
MsgBox "Перейти до другий формі? "' Видає повідомлення
Form3.Hide 'Приховує 3 форму
Form2.Show 'Показує 2 форму
Command1.Enabled = True 'Робить доступною кнопку знаходження темпів зміни ВВП
Command2.Enabled = True 'робить доступною кнопку знаходження max приросту ВВП
End Sub
Нижче наводяться форми, як вони виглядають в режимі проектування, тобто до запуску програми.
ПЕРША ФОРМА
p> ДРУГА ФОРМА
p> ТРЕТЯ ФОРМА
p> Далі наводяться форми в режимі Run, тобто після запуску програми. <В
ПЕРША ФОРМА
1. Після рассчета середніх значень даних за 4-річні періоди:
2.
Після вибору файлу і запису в нього даних:
В
p> ДРУГА ФОРМА
1. Після зчитування даних, визначення ВВП і темпів його зміни:
p> 2. Після знаходження періоду максимального приросту і приросту в 50%:
p> ТРЕТЯ ФОРМА
1.После проведення сортування:
p> Щоб переконатися, що в процесі виконання програм дані дійсно записуються у файл, нижче показана структура файлів, використаних у проекті:
1. Файл, вибраний користувачем для запису середніх значень даних:
0.8843492, 14.05, 1621.173, 2244, 49.9, 238652.5
1.250556, 14.425, 1693.65, 3841, 68.65, 260827.3
1.786277, 14.65, 1858.58, 6714.5, 79.575, 280061.8
2.117049, 14.675, 1966.193, 11439.5, 91.8, 248772.3
2.23297, 14.1, 2244.097, 17332, 110.6, 259894.3
2.364754, 17.275, 2533.115, 22487.75, 117.525, 242344.5
2.543809, 16.2, 2736.063, 27369.25, 123.875, 283233.3
3.258096, 17.025, 3509.732, 34186.75, 129.5, 389459.5
2. Допоміжний файл, що...
