Основные структуры программы.

Команда WITH … ENDWITH задает несколько свойств для объекта с помощью операторов свойств, следующих сразу за оператором WITH. WITH <object Name> <.cStatements> … ENDWITH Параметры: object Name – задается имя основного объекта; cStatements – операторы VTF задающие свойства объекта.

Запрос к таблице базы данных: организуется с помощью операторов use <имя базы данных . имя таблицы> select from where into Результаты запроса сохраняются в массиве Array a (m,n), где m – количество строк, n – количество столбцов, и затем распечатываются в таблице “Динамика выполнения дипломного проектирования на кафедре ИТС” со следующей шапкой: Дипломник Руководитель Группа Контрольная дата 1 Контрольная дата 2 Оператор ALEN rowsCount = ALEN (a,1) определяет количество строк в массиве а и присваивает это значение переменной rowsCount. colsCount = ALEN (a,2) определяет количество столбцов в массиве а и присваивает это значение переменной cowsCount.

Функция .cell (N_строки, N_столбца) активирует заданную ячейку в таблице. Свойства: .Text – задает содержание ячейки; .Bold=.T. – задает шрифту жирное выделение; .Bold=.F. – убирает шрифту жирное выделение;

Комментарии к каждой строке листинга

1. - создается локальная переменная, используемая только в рамках этой процедуры

2. - создается COM-объект Word и ему присваивается имя локальной переменной loWord

3. - устанавливается свойство объекта loWord не выдавать предупреждающих сообщений

4. - создается новый документ Word

5. по 58) - команда WITH … ENDWITH работает с объектом loWord

6. - открываем наш документ Word

7. по 57) - команда WITH … ENDWITH работает внутри объекта loWord

8. - жирное начертание текста

9. - размер шрифта

10. - тип шрифта

11. - выравнивание текста по центру

12. - вывод текста в скобках на экран

13. по 16) - задание свойств для печати после вывода текта “Динамика выполнения дипломного проектирования на кафедре ИТС ”

17. - открытие таблицы rukovoditely из базы данных data1

18. - выбор атрибутов для отображения результатов запроса, функция “TRIM” возвращает выражение без концевых пробелов

19. указание на таблицу и базу данных к которой формируется запрос

20. - Оператор сортировки по номеру группы и по фамилии

21. - into – оператор указывает, где следует хранить результаты запроса, ARRAY – массив а

22. - переменная TALLY содержит количество записей, обработанной последней табличной командой, т.е. это число записей, отображенных из таблицы rukovoditely

23. - переход на новый абзац

24. - пустая строка (пропуск)

25. по 26) - создаем две переменные и присваиваем им значение количества строк и столбцов в массиве а с помощью функции VTF Alen()

27. - создаем с помощью метода Add (VisBas) таблицу с rowsCount+1 строками (+1 – строка для шапки таблицы, rowsCount – для данных) и colsCount столбцами

28. - создаем переменную T и присваиваем ей текущую таблицу с помощью метода (VisBas) – Tables(1)

29. - работаем с переменной T (таблица)

30. по 39) - с помощью функции .cell (N_строки, N_столбца), свойства Text и Bold создаем в Word шапку таблицы

40. - создаем переменную j для работы с номером строк

(первая строка таблицы уже создана операторами 30)-39), работаем со 2-ой строки)

40. - организуем начало цикла для управления строкам таблицы от 2-ой строки до rowsCount+1

41. по 46) - последовательно заполняем 5 ячеек каждой строки таблицы в Word из массива а

47. конец цикла FOR

48. окончание тела команды WITH задающей свойства объекта T (оператор 29))

49. снимает в операторе 7) добавление .Selection

50. переход на новый абзац

51. удаляет из памяти массив а

52. если условие, указанное в строке 22) не выполняется, то

53. по 55) пропуск абзаца, печать текста в скобках, пропуск абзаца

56. конец тела оператора условия IF

57. окончание тела команды WITH (оператор 7))

58. окончание тела команды WITH (оператор 5))