Round(document.frm.Kolich.value_
* Document.frm.cena.value,2)
End Sub
</SCRIPT>
</HTML>
Рис. 1.2. Использование VBScript на web-странице
Учебное задание
Модифицируйте программу Вашей лабораторной работы № 14 с размещением VBScript-программы на web-странице. На форме должны быть поля для X, Y. Расчет Y организовать двумя способами: 1) использование кнопки «Расчет»; 2) использование события onChange поля для Х.
РАЗДЕЛ II. ПРОГРАММИРОВАНИЕ НА ЯЗЫКЕ VBA
Лабораторная работа № 5
ПРОГРАММИРОВАНИЕ НА ЯЗЫКЕ VBA В MICROSOFT OFFICE WORD
I. Цель работы:освоение работы с языком VBA в Word-документе.
II. Краткое изложение учебного материала
Общая характеристика языка VBA и его отличия от VBS
Microsoft Visual Basic for Applications (VBA) является встроенным языком программирования для приложений Microsoft Office (Word, Excel, Access, PowerPoint, Outlook, FrontPage, InfoPath), а также и для некоторых других системах (Microsoft Visio и Project, Corel-DRAW, CorelWordPerfect Office 2000, AutoCAD). Одновременно существует новый способ разработки приложений Office – использование средств Visual Studio Tools for Office (VSTO).
VBA имеет очень много общего с VBScript [1].
Наиболее существенные отличия – в правилах написания идентификаторов, в описании переменных, соглашении об именовании процедур:
1) Идентификаторы в языке VBA в русской версии Microsoft Office могут использовать русские буквы. Нельзя использовать пробел, точку, символы !, @, &, $, #. Первый символ в имени – обязательно буква.
2) Переменные и массивы могут быть объявлены с указанием их типа Dim <имя> [As <тип>]. Типы переменных [1, таблица 1.4].
|
|
|
3) Процедуры могут быть общими и событийными (процедуры обработки событий для объектов). Имя событийных процедур состоит из имени объекта и имени события, между которыми стоит символ подчеркивания: Sub <ИмяОбъекта_ИмяСобытия>, например Sub Кнопка1_Click().
При программировании на языке VBA используются библиотеки объектных типов (для Word это файл MSWORD.OLB). Информацию о типах объектов можно найти в Обозревателе объектов (Object Browser) в редакторе Microsoft Visual Basic, встроенном в систему Word и другие приложения Office (в меню пункт View – Object Browser).
На странице документа Word можно организовать работу с достаточно сложной программой, даже не создавая для этого отдельных Windows-форм, запускающихся, например, при открытии документа или при нажатии на кнопку на странице документа, а просто разместив на странице поля ввода данных и показывая программно на той же странице результаты после изменения данных.
Однако, многие математические расчеты проще выполнить в системе Excel, при хранении информации в базах данных достаточно большие возможности обработки этой информации имеет Access. При работе с базами данных в крупных информационных системах может быть предусмотрено формирование отчетов с выводом их в Word или Excel, при этом разработку таких программ может выполнить лишь специалист, хорошо знакомый как с архитектурой базы данных информационной системы, так и с языком VBA.
|
|
|
Использование режима записи макросов
Некоторые принципы работы с объектами Word можно освоить, если записать некоторую последовательность своих действий с помощью средства Word Запись макроса, которое присутствует на вкладке ленты Разработчик. Данная вкладка присутствует, если в Параметрах Word на странице Основные стоит галочка у пункта Показывать вкладку Разработчик на ленте (в старых версиях) или в Параметрах Word в разделе Настроить ленту стоит галочка для вкладки Разработчик (Word 2010, 2013).
Макрос – текст программы, сохраненный в формате документа Office с поддержкой макросов. В настоящее время эта программа является процедурой, написанной на языке VBA.
Выполним следующие действия:
1) нажмем на кнопку Запись макроса, ни кнопку, ни клавиши макросу можно не назначать, зададим, где будет сохраняться текст макроса: Макрос доступен для текущего документа;
2) переместимся в конец документа с текущей позиции (была не в конце), нажав клавиши Ctrl+End;
|
|
|
3) нажмем клавишу Enter и напишем слово «Привет!»;
4) еще раз повторим операцию пункта 3;
5) выделим последнее слово, нажав Shift+Home и нажмем клавишу Delete;
6) перейдем в начало первой строки «Привет!», нажмем Shift+End и затем клавишу Delete;
7) на вкладке разработчик сначала нажмем кнопку Остановить запись , затем кнопку Visual Basic;
8) в открывшемся окне редактора Microsoft Visual Basic слева на панели Project Explorer сделаем двойной щелчок мышкой на разделе Project (<текущий файл>) – Modules – NewMacros и увидим справа окно с текстом программы на языке VBA (рис. 1.1). Программы раздела Modules хранятся в файле документа Word, если он сохраняется в формате Документ Word с поддержкой макросов (*.docm), если сохранять в обычном формате (*.docx) текст программ не будет сохранен.
Рис. 1.1. Текст макроса на языке VBA в редакторе Microsoft Visual Basic
В тексте Макроса1 (Sub Макрос1() – процедупа языка VBA, см. рисунок 29.1) используется объект Selection – место, где находится курсор в текущем документе (объект Application) или выделенный фрагмент документа. Полный синтаксис обращения к этому объекту: Application.Selection…, но имя родительского объекта можно опустить, так как при работе с документом в системе Word объект Application всегда является текущим активным объектом.
|
|
|
Текст Макроса1 с комментариями:
Selection.EndKey Unit:=wdStory
‘ переместить курсор в конец всего документа
Selection.TypeText Text:="Привет!"
‘ написать текст
Selection.TypeParagraph
‘ перейти к новому абзацу
Selection.TypeText Text:="Привет!"
‘ написать текст
Selection.HomeKey Unit:=wdLine, Extend:=wdExtend
‘ выделить фрагмент текста от текущей позиции до начала строки
Selection.Delete Unit:=wdCharacter, Count:=1
‘ удалить выделенный фрагмент
Selection.MoveUp Unit:=wdLine, Count:=1
‘ переместить курсор вверх на одну строку
Selection.EndKey Unit:=wdLine, Extend:=wdExtend
‘ выделить строку
Selection.Delete Unit:=wdCharacter, Count:=1
‘ удалить строку
Выполнить макрос можно, если на вкладке ленты Word Разработчик выбрать команду Макросы, затем в списке выбрать Макрос1 и нажать кнопку Выполнить. Две строки текста очень быстро появятся и исчезнут.
Дата добавления: 2018-02-18; просмотров: 664; Мы поможем в написании вашей работы! |
Мы поможем в написании ваших работ!