Введение в программирование на VBA - eDrive

38
Close 1
ПоследовательныйДоступ = тест
End Function
Sub ПрямойДоступ ()
Open " мойФайл.txt" For Random As 1 Len = 20
тест1 = "Это тест 1"
тест2 = "Это тест 2"
Put 1, 1, тест1
Put 1, 2, тест2
Close 1
Open "мойФайл.txt" For Random As 1 Len = 20
Get 1,2, тест
Close 1
MsgBox тест, vbInformation
End Sub
Sub ПереименоватьУдалить ()
Name "мойФайл.txt" As " мойФайл.dat"
MsgBox "Сейчас файл будет удален"
Kill "мойФайл.dat"
End Sub
Структурное программирование
Структуры и модули
Чем сложнее проектируемая система, тем меньше возможность ее
полного процедурного описания. Причина этого заключается в самой
природе объектов, моделью которых является любая программная система.
Модель — это всегда односторонний, неполный, предвзятый взгляд на
оригинал. И этот взгляд меняется по мере изменения запросов пользователя,
его жизненной и профессиональной позиции, его опыта и мировоззрения. И
главное, что сам объект постоянно развивается, побуждая к адекватному
развитию отражающие его модели.
С учетом этого положения, в языке Algol впервые была внедрена
концепция структурного программирования. Следуя ее философии,
предложенной Э.Дейкстрой, процесс проектирования программы должен
состоять из последовательности представлений алгоритма решения задачи
«уровнями абстрактных машин». В результате программа как бы
разбивается на ряд вычислителей, из которых «верхний» максимально
приспосабливается к конкретной прикладной задаче, а «нижний» выполняет
команды алгоритмического языка.
В качестве инструмента структуризации Дейкстра ввел управляющие
структуры, именуемые также составными операторами: