Какво е Visual във Visual Basic за приложения? За щастие, VBA елиминира голяма част от карането на въвеждане на код. В някои случаи записвате необходимите команди във вашето приложение и ги използвате като отправна точка, когато създавате нова програма.

VBA срещу Visual Basic В допълнение към факта, че VBA не ви позволява да създавате отделни приложения, една от основните разлики е, че програмите, написани във VBA, са по-бавни от програмите, написани във Visual

Разлики между VBA и Visual Basic VBA има много общо с Visual Basic, неговия голям брат за изграждане на независими приложения. И тъй като езиците са сходни, можете да прехвърлите повечето от уменията си за VBA програмиране към Visual Basic. Въпреки това, трябва да сте наясно с

Извикване на редактора на Visual Basic Редакторът на Visual Basic служи като команден център за работа във VBA. Трябва да сте в него, когато разработвате VBA формуляри, пишете VBA код, тествате и отстранявате грешки на VBA програми. Ще станете експерт по използването на редактора на Visual Basic, след като прочетете глава 5, но засега

Кратко въведение в редактора на Visual Basic Първите ви обаждания към редактора на Visual Basic може да са объркващи. Вероятно ще намерите наличието на менюта и ленти с инструменти в горната част на екрана познато за вас, но какво означава това изобилие от прозорци? Прогнозирайте тяхната относителна позиция

Глава 5. Редактор на Visual Basic на вашите услуги. В тази глава ... ~ Намиране на команди в системата от менюта на редактора на Visual Basic ~ Показване, преместване и персонализиране на ленти с инструменти ~ Разбиране и използване на ленти с инструменти за закрепване и Windows ~ Борба с тълпи от Windows редактор на Visual Basic ~

Потребителски интерфейс на редактора на Visual Basic Редакторът на Visual Basic е стандартен елемент от менюто на Microsoft, лентите с инструменти и клавишните комбинации изглеждат и работят много подобно на Microsoft Office. Ще се чувствате като у дома си, когато използвате VBA с приложения от Office.

Среда за разработка на EMbedded Visual Basic 3.0 За краткост тази глава ще използва абревиатурата eVB за обозначаване на eMbedded Visual Basic 3.0. Можете да стартирате eVB или от менюто "Старт" (Старт> Програми> Microsoft eMbedded Visual Tools> eMbedded Visual Tools> eMbedd30 Намери Visual). в инсталационната папка

Разлики между eVB и Visual Basic за. NET По принцип разликите между VB.NET и eVB са свързани с интегрирането на езика VB с Compact Framework и се определят точно от вътрешната структура на самия CF Типове данни В eVB имаше един и единствен тип данни за всички случаи, Variant, който eVB наследи от VB Script. Визуално

Delphi и Visual Basic 1. Delphi има ли еквивалент на масив от контроли на Visual Basic? Не. Компонентите на Delphi нямат свойство Index като VB. Има обаче три основни причини, поради които искате да ги използвате във VB, и за всяка има решение на Delphi. Причина 1. Искате

Целта на лабораторната работа

Тази лаборатория е предназначена да предостави практически опит в използването на възможностите на езика Visual Basic за приложения за създаване на процедури за текстообработка, използвайки свойствата и методите на обектите на Microsoft Word.

Основна информация за обектиWord, техните свойства и методи

Visual Basic за приложения поддържа набор от обекти, които съответстват на елементите на Word. Използвайки свойствата и методите на тези обекти, можете да автоматизирате всички операции в Word. Въпреки това е препоръчително да се автоматизира изпълнението на онези операции, за чието изпълнение няма стандартни инструменти в Word или изпълнението им от стандартни инструменти отнема време или рутинна работа.

Най-важните са:

Предмет документ който е нов или вече отворен документ.

Основните свойства на обекта документ са:

Броя - броят на документите, отворени в момента;

ActiveDocument - активен документ.

Някои обектни методи документ и колекции Документи :

Отвори - отваря файл, съдържащ съществуващ документ и автоматично го добавя към колекцията;

Добавете - добавя нов празен документ;

Запазете - запазва промените в съществуващ документ без затваряне;

Запазете Като (само за обект) - записва активния новосъздадения документ в текущата папка;

Вещ - позволява ви достъп до артикул от колекцията;

Активирате (само за обект) - активира отворен документ;

Принтирам (само за обект) - отпечатва документ;

Близо - затваря документа.

Обекти характер (символ). Word (дума). Присъда (оферта), Параграф (параграф). Раздел (раздел на документа), уточнявайки структурирането на текста на документа.

Всички тези обекти имат свойства:

Броя - свойството връща броя на елементите в колекцията;

Първо - property връща обекта, който е първият елемент в колекцията;

Последно - property връща обекта, който е последен

елемент.

Колекции герои , думи , Изречения има само един метод Вещ(Индекс) .

колекция Параграфи има всички изброени по-горе свойства за тази група колекции и набор от свойства, чиито стойности определят формата на абзаца.

Форматът на параграф може също да се определи с помощта на методи. Ето някои от методите на колекцията Параграфи:

Вещ - дефинира колекция артикул;

Добавете - добавяне на нов празен абзац (параметърът на метода определя точката на вмъкване, зададена от обекта Обхват);

Вмъкване на параграф , InsertParagraphAfter , Вмъкване на параграф преди - вмъкнете празен абзац вместо текст или след или преди текста, определен от обекта Изборили Обхват;

Нулиране - премахва ръчното форматиране, като прилага формата, определен от стила на абзаца, към абзаца;

Отстъп , Outdent - увеличете, намалете отстъпа на абзаца от ръба на листа;

TabHanging Indent ( Броя ), TabIndent ( Броя ) - нараства ( Броя> 0), намаление ( Броя<0) выступ или отступ абзаца от края листа на заданное количество позиций;

Космос 1, Космос 2, Космос 15 - задайте междуредово разстояние (единично, двойно, едно и половина).

Обекти Обхват (диапазон) и Избор (ударение), представляващи части от документа.

Предмет Обхватви позволява да зададете произволен диапазон, който е последователност от индексирани елементи и може да бъде получен чрез метода Обхватили собственост Обхватдруги обекти.

Свойства на обекта Обхват са:

Започнете - началната позиция на символа на диапазона.

Край - позицията на крайния знак на диапазона.

Текст - ви позволява да получите или промените съдържанието на обект.

Предмет Изборзадава избраната област (фрагмент) в документа. Селекцията в документ дефинира непрекъснат регион от елементи, но не е диапазонът, определен от неговия начало и край. Може да бъде избрана само една селекция, така че един обект Selection може да бъде активен в даден момент. Предмет Изборможе да се получи с помощта на имота Изборили метод Изберетедруги обекти.

По-долу са дадени някои от методите, присъщи на обектите Избор и Обхват :

Ход - метод за преместване на точката на вмъкване;

MoveStart , Преместване END - методи за промяна на стойностите на свойствата Start и End;

Свиване - свива диапазон до неговото начало или край.

Следващия - метод за получаване на препратка към следващия елемент от колекция от обекти в диапазон или селекция;

Изтрий - изтрива текста, включен в диапазона.

InsertAfter , InsertBefore вмъква текст преди или след текст в рамките на диапазон. След поставяне на текст, диапазонът се разширява, за да включи вмъкнатия текст.

копие - копира обекта в клипборда;

Разрез - премества обекта в клипборда;

Залепете - ви позволява да поставите съдържанието на буфера в областта, определена от обект Range или Selection.

Пакетът Word, комбиниран с VBA, предоставя широка гама от опции за работа с текст или части от текст. Можете да извикате всеки параграф, изречение и т.н. за обработка.

За достъп до определени фрагменти от документа, обекти като напр Секции(секции), Параграфи(параграфи), Изречения(предложения), думи(думи) и др.

Думи (6) дава възможност да се премине към шестата
дума в документа

Изречения (11) отиват към единадесето изречение

След като навигирате до определена част от документа, можете да използвате обекта Шрифткоето ви позволява да променяте свойствата на шрифта. Този обект съдържа методите, намиращи се в лентата с менюта „Формат | Шрифт".

Предмет Обхвате основен в операцията за редактиране. Може да се разглежда като непрекъснат фрагмент от текст (несвързан по никакъв начин с избора), който не зависи от позицията на курсора. Обхватвключва обекти като думи(думи) или Изречения(предложения); когато се отнася до тях, самият обект Обхватне е необходимо да указвате, докато за Секции(секции) или Параграфи(параграфи) е необходимо да се направи това.

Предмет Обхватподдържа основните методи, използвани за форматиране на текст (като "Копиране", "Поставяне", "Изрязване", команди от менюто "Формат").

За да изпълнявате задачи, ще трябва да използвате функции, които работят със символни променливи.

За да се запознаете с примери за код, препоръчително е да използвате техниката, когато форматирате част от документа в режим на запис на макроси, след което анализирате макрокода и го редактирате.

За да запишете макрос, трябва:

1. Изберете в менюто „Услуга | Макрос | Започнете да записвате”.

2. Въведете името на новия макрос в прозореца "Запис на макрос" в полето "Име на макроса".

3. Изберете от списъка „Наличен макрос за” шаблон или документ, в който ще бъде съхранен макроса.

5. Въведете бутона “Панели” в полето “Присвояване на макрос” (за да зададете бутон на лентата с инструменти или команда от менюто към макрос); бутона "Клавиши" (за присвояване на клавишна комбинация към макрос); ако макросът не трябва да бъде присвоен, щракнете върху бутона „OK“. Ако в процеса на работа често използвате макрос, тогава е препоръчително да му зададете бутон или клавишна комбинация.

Не забравяйте, че трябва да използвате клавиатурата, за да записвате действията си, тъй като действията, извършени с мишката, не се записват.

Има една особеност при записването на готов документ на Word, който съдържа макроси и процедури. Ако си спомняте, че работите с макроси в Excel, тогава когато отворите готов документ, там винаги се задава въпросът: „Деактивиране на макроси при отваряне или не?“. И ако посочите, че макросите трябва да бъдат деактивирани, тогава подготвените бутони няма да работят.

В редактора на Word, за разлика от Excel, е инсталирана силна защита срещу макроси (макросите се считат за вируси) и когато отворите отново същия документ, в който всички програми и макроси са работили, заявката за активиране или деактивиране на макроси няма да работи и ще работа също нищо няма да стане.

Следователно, когато записвате документ в Word, трябва да следвате следната последователност от стъпки:

2. Изберете в менюто "Услуга" елемента "Настройки за сигурност". Появява се диалоговият прозорец Защита.

3. Щракнете върху бутона „Макрозащита“, за да промените нивото на защита на файла (по подразбиране е Високониво на сигурност , Следователно програмите ви няма да работят, когато отворите отново файла).

4. Изберете в появилия се диалогов прозорец в раздела „Ниво на сигурност”. Средно аритметичноили Късниво на сигурност . При избора Среденниво на сигурност, когато отворите документ, ще бъдете подканени да активирате или деактивирате макроси. За да работят програмите и макросите в документа, трябва да изберете „Не деактивирайте макросите“.

При избора Нисканиво Диалоговият прозорец за сигурност няма да се появи и макросите ще бъдат свързани автоматично.

5. Отидете на раздела „Надеждени източници“ и активирайте квадратчето за отметка „ Доверен достъп до проект на Visual Basic”.

6. Запазете документа си.

Практическа работа № 9-1 "Работа в словото"

Проектирайте бутони, които могат да се използват за синтактичен анализ на изречението. Когато поставите курсора върху намерената дума и натиснете съответния клавиш, думата трябва да бъде боядисана в определен цвят и подчертана.

Оперативна процедура.

1. Въведете текст в редактора WORD.

2. Изберете в менюто „Услуга | Макрос | Започнете да записвате”.

3. Дайте име на макроса (например „Име_съществително“).

4. Въведете описание за макроса в полето "Описание".

5. В полето "Присвояване на макрос" дефинирайте метода, по който ще бъде извикан макросът (бутон или клавишна комбинация).

6. Извършете действията, които трябва да бъдат включени в макроса.

В нашия случай последователността на действията ще бъде следната: поставете курсора пред всяка дума; подчертайте тази дума; задайте цвят на шрифта - червен, единично подчертаване.

Не забравяйте да използвате клавиатурата си, за да записвате действията си!

7. Натиснете бутона “Спиране на записа”, след като запишете макроса.

8. Следвайте същите стъпки, за да определите предиката (само задайте цвета на шрифта на зелен и задайте двойното подчертаване).

9. Подгответе бутона “CommandButton1” на работния лист над текста, именувайте го “Subject”.

10. Прегледайте записаната програма, копирайте я и я пренапишете през режима за писане на програмата Изходен текств бутона "Предмет".

11. Направете същото за бутона "Предвидимо".

12. Задайте нивото на защита на документа.

Практическа работа № 9-2 "Брой параграфи в документа"

Помислете за документ, който има няколко параграфа. Предизвикателството е програмно да се определи броят на параграфите в документа; озаглавете текста; в края на документа покажете съобщение за броя на параграфите.

Знаем, че в Word броят на абзаците се определя от символа ¶, който се появява всеки път, когато натиснете клавиш. Но е непрактично да проверявате и преброявате броя на тези знаци, тъй като има стандартни методи. Припомнете си, че документът, с който работим, се нарича активен документ и ние ще се позоваваме на него в програмата. ActiveDocument.

Вземете например текст за Интернет, а именно, пренос на информация и протоколи. Текстът съдържа 6 абзаца, съдейки по броя на специалните знаци.

Оперативна процедура.

1. Обадете се на контролния панел („Преглед | Ленти с инструменти | Контроли“).

2. Подгответе бутона “CommandButton1” на работния лист под текста.

3. Преименувайте бутона на „Брой параграфи“. За да направите това, извикайте „Свойства“ на контролния панел. Ще се появи панелът "Свойства". Изберете свойството „Caption“ и въведете името в дясната колона.

4. Дайте на бутона свойството да тече около контура, така че бутонът да може да се движи около листа. За да направите това, отворете контекстно-чувствителното меню на обекта бутон и изберете „Формат на обекта“. Появява се диалоговият прозорец Format Control. В раздела "Позиция" изберете опцията "По контур".

5. Изберете командата "Изходен текст" в контекстно-чувствителното меню на този обект или щракнете двукратно върху бутона. Ще се отвори редакторът на режим на писане на програма.

Алгоритъм за изпълнение на задачата:

1. Декларирайте променливи:

а) k е променлива за отчитане на броя на параграфите в документ;

б) Текст - променлива за формиране на текст на отговор за броя на параграфите;

в) ZAGOLOVOK - променлива, която ще дефинира областта за показване на заглавката.

2. Определете броя на параграфите, като използвате метода Count на обекта Paragraphs.

3. Формирайте текста на изходното съобщение.

4. Поставете допълнителен параграф след последния параграф на документа, за да се покаже съобщението.

5. Покажете текстовото съобщение в подготвения параграф.

6. Оформете зоната за показване на заглавието “Протоколи”.

7. Покажете името “Протоколи”.

8. Задайте шрифта и размера на заглавието.

9. Поставете знака в края на абзаца, така че заглавието и началото на текста да са на отделни редове.

Можете да допълните тази задача. Например, нека съобщението за броя на абзаците да бъде показано в червено и размер на шрифта 14. Учениците могат да направят това сами. Моля, имайте предвид, че мястото на този програмен фрагмент е много важно: то трябва да се намира само в тази част на програмата, а не след работа с заглавката.

Резултатът от изпълнението на програмата е показан на фигурата.

Практическа работа No 9-3 „Брой букви а(руски) в параграфа "

Тази практическа работа се извършва със същия документ като работа № 9-2 (с документ, който се състои от няколко параграфа). Задачата е програмно да определите номера на абзаца, в който ще се броят буквите а; пребройте техния брой; в края на документа (или след абзаца, в който е извършено преброяването) се показва съобщение за броя на буквите.

Оперативна процедура.

2. Подгответе бутон на работния лист под текста „CommandButton2“.

3. Преименувайте бутона на „Брой букви ав параграфа”.

4. Дайте на бутона формат за опаковане, така че да може да се мести около листа.

текст ”или щракнете двукратно върху бутона (ще влезем в редактора в режим на писане на програма).

1. Декларирайте променливи:

a) b - низова променлива за поставяне на избрания параграф в документа;

b) k е променлива за съхраняване на броя на параграфите в документа;

в) dl - променлива за съхраняване на дължината на абзаца;

г) Текст - променлива за формиране на текст на отговор за броя на знаците ав параграф;

д) Nab - променлива за въвеждане на номера на абзаца, в който ще се извърши броенето;

е) I - променлива за организиране на цикъла;

g) kol - променлива за броене на знаци а;

h) REZULTAT - променлива, която ще дефинира областта за показване на заглавието.

2. Въведете номера на абзаца, като използвате диалоговия прозорец.

3. Определете броя на параграфите в документа.

4. Проверете съществуването на въведения номер на параграф и издайте съобщение за грешка, ако няма такова.

5. Въведете текста на целия абзац в променлива b.

6. Определете дължината на абзаца.

7. Организирайте цикъл за намиране на символ а.

8. Формирайте текста на изходното съобщение.

9. Поставете допълнителен параграф след последния параграф на документа, за да се покаже съобщението.

10. Покажете текстовото съобщение в подготвения параграф.

11. Задайте конкретен шрифт, размер и цвят на текстовото съобщение.

Резултатът е показан на фигурата.

Практическа работа No 9-4 "Изречения в абзац"

Тази практическа работа се извършва със същия документ като работа № 9-2 и 9-3 (или с всеки текст, който се състои от няколко параграфа). Задачата е програмно да се определи номера на абзаца, в който е най-голям брой изречения; маркирайте съобщението за номера на абзаца и броя на изреченията с помощта на диалоговия прозорец; подчертайте този параграф с различен цвят.

Оперативна процедура.

1. Извикайте контролния панел „Преглед | Ленти с инструменти | Контролни елементи”.

2. Подгответе бутона “CommandButton3” на работния лист под текста.

3. Преименувайте бутона на „Изречения в абзац“.

4. Дайте му поток около формата на контура, така че бутонът да може да се движи около листа.

5. Изберете в контекстно-чувствителното меню на този обект елемента “Initial текст ”или щракнете двукратно върху бутона (влизаме в редактора в режим на писане на програма).

Алгоритъмът за изпълнение на задачата е както следва:

1. Декларирайте променливи:

а) k е променлива за съхраняване на броя на параграфите в документа;

б) kol - променлива за съхраняване на броя на изреченията в абзац;

в) i е променлива за организиране на цикъл;

г) Mas () - масив за въвеждане на броя на изреченията в абзаци;

д) Ответ - променлива за генериране на текст на отговор с резултатите;

f) Max - променлива за съхраняване на максимален брой изречения в абзац;

g) ind е променлива за съхраняване на номера на абзаца с максимален брой изречения;

з) REZULTAT е променлива, която ще дефинира областта на абзаца, към която искате да приложите елементите за форматиране.

Когато декларираме масив, ние не знаем броя на абзаците в документа. Следователно, ние декларираме масива на два етапа: 1-ви етап - декларация без размер Dim Mas () As Integer; 2-ри етап - след определяне на броя на параграфите в документа, предефинирайте измерението на масива ReDim Mas (k) As Integer. Такива масиви се наричат ​​динамични.

Освен това, за да накарате индекса на масива да започне от 1, а не от 0 (за удобство на работа), в редактора, в началото на листа с процедурата, посочете командата „Опция База 1“.

3. Предефинирайте размерността на масива.

4. Организирайте цикъл, за да определите броя на изреченията в абзаци, въведете тяхното измерение в масив и запишете порядковия номер в масива, който съответства на номера на абзаца.

5. Организирайте цикъл, за да намерите най-голям брой изречения в параграф (работете с генерирания масив) според стандартния алгоритъм.

6. Формирайте текста на изходното съобщение.

7. Покажете резултата в диалоговия прозорец за съобщение.

8. Определете площта на абзаца за форматиране.

9. Задайте конкретен шрифт, размер и цвят на текста-абзац с максимален брой изречения.

Диалогов прозорец със съобщение за резултат ще изглежда така:

Резултатът от задачата е показан на фигурата.

Практическа работа No 9-5
"Думи-палиндроми"

Задачата е програмно да се определи дали текстът съдържа палиндроми и да се подчертаят тези думи с различен цвят.

Оперативна процедура.

1. Подгответе текст (можете да измислите история или стихотворение с палиндроми SHALASH, KAZAK, NAGAN, MADAM и др.).

2. Извикайте контролния панел „Преглед | Ленти с инструменти | Контролни елементи”.

3. Подгответе бутона “CommandButton1” на работния лист под текста.

4. Преименувайте бутона на “Palindromes”.

5. Дайте на създадения бутон формат на обвивка по контура, така че да може да се мести около листа.

6. Изберете в контекстно-чувствителното меню на този обект елемента “Initial текст ”или щракнете двукратно върху бутона.

Алгоритъмът за изпълнение на задачата е както следва:

1. Декларирайте променливи:

a) Slovo - променлива за последователно съхранение на избрани думи;

b) L е променлива за съхраняване на дължината на дума;

в) M е променлива, определяща половината от дължината на избраната дума;

г) K - променлива за образуване на 1-ва половина на думата;

д) D - променлива за образуване на 2-ра половина на думата;

е) Kol е променлива за съхраняване на броя на параграфите в документа.

2. Определете броя на параграфите в документа.

3. Определете областта, в която да търсите палиндроми – това са всички параграфи от текста.

4. Организирайте цикъл за подчертаване на думите в областта на дефиницията.

5. Задайте маркираната дума като низова променлива.

6. Определете дължината на избраната дума.

7. Проверете дължината на думата. Ако е равно на 1, тогава няма смисъл да проверявате думата.

8. Организирайте цикъл, за да определите дали думата е палиндром.

9. Променете цвета на буквите на думата-палиндром.

В резултат на изпълнението на програмата, думите-passindromes ще бъдат маркирани в синьо.

В приложение на Power Point можете да автоматизирате много задачи с помощта на VBA. Нека да разгледаме използването на персонализирани формуляри за проектиране на тестове и различни задачи в PowerPoint. Освен това е възможно не само да въвеждате информация, но и да използвате контролите. За да направите това, трябва да следвате две прости правила:

1. Макросите трябва да бъдат присвоени на бутоните на лентата с инструменти.

2. Контролните елементи трябва да се поставят в диалогови прозорци.

Практическа работа No 10-1 „Умееш ли да броиш”

Създайте презентация, за да тествате и оцените уменията си за устно смятане.

Оперативна процедура:

1. Отворете Power Point и създайте заглавен слайд; подредете пет бутона върху него:

2. Напишете програми за извикване на потребителски формуляри (чрез контекстното меню "Изходен текст", подчертавайки тематичните бутони).

Програмни текстове за бутони:

UserForm1.Show

UserForm4.Show

Частна подкомандаButton3_Щракнете ()

UserForm3.Show

Частна подкомандаButton4_Click ()

UserForm2.Show

3. Конфигурирайте бутона "Изход", за да прекратите шоуто.

4. Проектирайте персонализиран формуляр UserForm1 „Събиране и изваждане от 1 до 10“ в редактора на Visual Basic.

При проектирането на формуляр Свойство за надписиза етикети Етикетнаправи го празен; форматирайте всички елементи.

Деклариране на глобални променливи

Public a As Integer

Public b Като цяло число

Public R като цяло число

Public v Като цяло число

Публично n Като цяло число

Public f Като цяло число

Частна подкомандаButton1_Щракнете ()

„a е променлива за първото число

„b е променлива за второто число

„R е променливата за получаване на резултата

"v, n са променливи за правилното броене

“ и грешни отговори

"f е променливата на оператора за избор

f = f + 1

Изберете Case f

„Присвояване на стойности на променливи

"a и b през RND в интервала (0; 9)

b = Int (10 * Rnd ())

a = Int (10 * Rnd ())

„Оформяме в надписите – или + и =

Label3.Caption = "-"

Label5.Caption = "="

Определяме по-голямото от числата и това е първото число, по-малкото е второто число:

Ако a> b Тогава

Label2.Caption = a

Label4.Caption = b

Label2.Caption = b

Label4.Caption = a

„Изчислете резултата

R = Abs (a - b)

Сравняваме резултата и въведения отговор, броим числото

v = v + 1

Label12.Caption = "Правилно"

n = n + 1

Label12.Caption = "Неправилно"

Label12.Caption = ""

b = Int (10 * Rnd ())

a = Int (10 * Rnd ())

Label2.Caption = a

Label4.Caption = b

Label3.Caption = "+"

Label5.Caption = "="

R = a + b

Напишете подобни програми за следващите 9 примера.

„Проверка на резултата в пример 10

Ако Val (R) = Val (TextBox1) Тогава

v = v + 1

Label12.Caption = "Правилно"

n = n + 1

Label12.Caption = "Неправилно"

„Въвеждаме броя на верните и грешните отговори в надписите, даваме прощални думи

Label7.Caption = "Вашият резултат"

Label8.Caption = "Правилно"

Label10.Caption = Str (v)

Label9.Caption = "Неправилно"

Label11.Caption = Str (n)

Ако v = 10 Тогава Label12.Caption =

" Много добре!!!" Else Label12.Caption =

"Още работа по партитурата !!!"

UserForm1.Hide

Край Изберете

Бутонна програма "Отново"

Частна подкомандаButton2_Click ()

Набираме отново програмния код за бутона (за да направите това, щракнете върху бутона)

„Нулиране на променливите, които се броят

резултат

„Изтриваме информация в надписите

Label10.Caption = ""

Label11.Caption = ""

Label12.Caption = ""

Label2.Caption = ""

Label4.Caption = ""

Label3.Caption = ""

Label5.Caption = ""

Label7.Caption = ""

Label8.Caption = ""

Label9.Caption = ""

Под CLS ()

TextBox1.Text = ""

В работно състояние формулярът изглежда така:

5. Проектиране на потребителски формуляри UserForm2, UserForm3, UserForm4.

6. Пишете програми в бутони.

Формулярът UserForm2 „Събиране и изваждане от 1 до 200” може да бъде както следва:

Пример за формуляра UserForm3 "Таблица за умножение":

Формулярът UserForm4 „Count“ може да бъде така:

7. Проверете дали проектът работи и запазете работата.

Практическа работа No 10-2 „Тест за визуална интелигентност”

Създайте презентация, която можете да използвате за тестване и оценка на визуалната интелигентност.

Оперативна процедура:

1. Отворете Power Point, създайте заглавен слайд.

2. Създайте чрез лентата с инструменти бутона „Define your Visual Intelligence” и напишете (чрез контекстното меню „Source text”) програмата за извикване на потребителската форма UserForm1:

Частна подкомандаButton1_Щракнете ()

UserForm1.Show

3. Създайте бутон „Изход“ през панела за чертежи и го конфигурирайте да завърши дисплея.

4. Проектирайте персонализиран формуляр в редактора на Visual Basic със следните контроли:

Public i като цяло число

Публично x като цяло число

„Променливата x отчита броя на верните отговори

Частна подкомандаButton1_Щракнете ()

i = i + 1

Изберете Case i

Label1.Caption = "Коя форма не съвпада с общия ред?"

UserForm1.Image1.Picture =

LoadPicture ("C: \ test1.JPG")

Ако OptionButton4.Value = Вярно

Тогава x = x + 1

OptionButton1.Value = False

OptionButton2.Value = False

OptionButton3.Value = False

OptionButton4.Value = False

UserForm1.Image1.Picture =

LoadPicture ("C: \ test2.jpg")

Ако OptionButton1.Value = True Тогава x = x + 1

OptionButton1.Value = False

OptionButton2.Value = False

OptionButton3.Value = False

OptionButton4.Value = False

UserForm1.Image1.Picture =

LoadPicture ("C: \ test3.jpg")

OptionButton1.Value = False

OptionButton2.Value = False

OptionButton3.Value = False

OptionButton4.Value = False

UserForm1.Image1.Picture =

LoadPicture ("C: \ test4.jpg")

Ако OptionButton3.Value = True Тогава x = x + 1

OptionButton1.Value = False

OptionButton2.Value = False

OptionButton3.Value = False

OptionButton4.Value = False

UserForm1.Image1.Picture =

LoadPicture ("C: \ test5.jpg")

Ако OptionButton4.Value = True Тогава x = x + 1

OptionButton1.Value = False

OptionButton2.Value = False

OptionButton3.Value = False

OptionButton4.Value = False

Label1.Caption = "Вашата оценка" & x

UserForm1.Hide

Край Изберете

Програма за изход

Частна подкомандаButton2_Click ()

UserForm1.Hide

5. Изберете тестови чертежи.

6. Покажете резултата след преминаване на всичките пет въпроса.

Практическа работа № 10-3 "Вашият соционичен тип"

Създайте презентация, с която можете да определите соционичния тип.

Оперативна процедура:

1. Дизайн на заглавен слайд; осигурете бутони за извикване на персонализирани форми за определяне на соционичния тип: "екстроверт - интроверт"; “Сензорно - интуиция”; „Логик - етик”; “Ирационално – рационално”; "изход"; „Опознай своя социотип“ (всички типове се определят).

2. Проектирайте персонализирани формуляри за определяне на социотипа:

· Разработване на програми за бутони за превключване към потребителски форми за описание на социотипове (референтни);

· Създайте “OptionButton”, за да изберете опция за отговор;

· Осигурете преход към формуляри, които съдържат референтен материал;

· Създаване на форма за определяне на социотипа;

· Създайте формуляр (извиква се при натискане на бутона "Кой е екстроверт?"), който ще съдържа референтен материал;

· Осигурете изчисляване на отговорите, когато щракнете върху бутона "Напред"; при последното натискане трябва да се даде резултатът: „Вие сте ЛОГИКА“ и т.н.;

· Осигурете, след като преминете всички въпроси и отговори, обаждане до формуляра, от което от своя страна можете да влезете в таблицата на отношенията на социотиповете или напълно да напуснете въпросника.

Допълнителни задачи

Намерете материал за създаване на тестов въпросник. Това може да бъде:

Тест по предмет:

IQ тест:

Тест за темперамент:

STUR тест (училищен тест за умствено развитие):

· Тест по професии и др.

Надяваме се, че представеният материал е бил полезен за вас. Желаем Ви успех!

ГЛАВА 10

Програмиране в Word

10.1. Защо да програмирам в Word

Word е най-старото и популярно приложение, включено в Microsoft Office. В повечето организации потребителите подготвят документи в Word.

От гледна точка на програмирането, Word е преди всичко инструмент за създаване на отчети към бази данни. В този случай отчет е всеки документ, който се формира въз основа на информация от база данни, например: споразумение, удостоверение за приемане, касов ордер, обявление за парична вноска, заповед до счетоводството, фактура и др., които могат да бъдат генерирани в Word включват документи с обобщени данни - отчети за периода, извлечения и др.

Авторът трябваше да създаде приложения с отчети, разработени в различни софтуерни продукти - Microsoft Access, Crystal Reports, Microsoft Reporting Services и др. Ако вашето приложение генерира отчети към бази данни в Microsoft Word, тогава най-вероятно такива отчети няма да бъдат най-бързите по отношение на тяхното формиране, а не най-лесните по отношение на програмирането. Но те определено ще бъдат най-приятелски настроени към крайния потребител. Защо?

Много често в предприятието се налага да коригирате само няколко реда във формуляра за отчет - например вместо "Директор" поставете "I.O.

Директори ". Ако отчетът е създаден в Crystal Reports или Microsoft Reporting Services, ще трябва спешно да се свържете с разработчика. И след известно време IO ще бъде одобрен като директор и разработчикът ще трябва да редактира отчета отново.

Ако отчетът първоначално е създаден в документ на Word, тогава потребителят винаги може да направи необходимите промени в създадения документ - от

по-голямата част от потребителите в предприятието знаят как да работят в Word. Вече не е необходимо спешно да търсите разработчик.

Word има и други предимства. По правило при изготвяне на отчети

v Word, стойностите от базата данни се заменят в шаблона за отчет, който се съхранява в базата данни или във файл (с разширение точка). Ако форматът на отчета е сложен, с много специфичен дизайн (например обявление за парична вноска), тогава е много по-лесно да подготвите неговия шаблон.

v Word, отколкото например Crystal Reports или Reporting Services.

Друго програмно приложение на Word е възможността за работа с различни формати на документи. Тази функция на Word може да се използва за масова обработка на документи.

Позволете ми да цитирам случай от практиката: в каталога на диска сме събрали няколкостотин "различни по размер" документи от различни потребители. Някои от тях са създадени в различни версии на Word, някои са просто текстови файлове, някои документи са във формати HTML, XML или EML (имейл съобщения). Предприятието е внедрило система за управление на документи, базирана на SharePoint Portal Server и трябва да обединим всички тези документи в един

формат (Word 2003) и ги качете на SharePoint Portal Server. Разбира се, без автоматизация в такава ситуация, ще отнеме много време да се забъркваш.

Третото програмно приложение на Word е форматирането на документи, например: програмно прилагане на стилове, намиране и замяна на части от текст в много документи наведнъж, работа със структурата на документ и т.н. Обикновено такива задачи се поставят в издателствата, за например при подготовката на ръкописи.

10.2. Въведение в програмирането в Word. Обектен модел

Общата структура на обектите на Word изглежда като тази, показана на фиг. 10.1.

Но не се плашете – повечето от тези стотици предмети никога няма да ви трябват. На практика за решаване на повечето софтуерни проблеми е достатъчно да знаете само пет обекта (с придружаващи колекции):

Обект на приложение;

обект на документ (с колекция от документи)

Обект за избор;

Обект на обхват;

обект Bookmark (с колекция от отметки).

Глава 15. Програмиране във VBA в Word.

В тази глава...

~ Обектен модел на Word

~ Обекти на ключови думи: Windows, Selections, Ranges и Find Object

~ Диапазони или селекции: какво да използвате при работа с текст

~ Методи и свойства за манипулиране на текст

~ Намерете и заменете текст с VBA в Word

От целия набор от приложения, Office Word предлага най-богатия набор от инструменти за програмиране. Познаването на Word обекти като Range и Find понякога може да бъде рисковано, но е от съществено значение, ако наистина искате да създадете VBA рутинни програми, които да освободят цялата сила на Word. Това е, за което ще говорим в тази глава.

Обектният модел на Word съдържа толкова много обекти и техните колекции, че имате нужда от огромен лист хартия, ако искате да изградите графично йерархия на всички тези обекти върху него. Очевидно мога да разгледам само част от колосалния брой обекти, свойства и методи, които можете да използвате във вашите програми. Тази глава обхваща само най-важните техники за работа с Word VBA. Ако искате по-подробна информация, ще трябва да се консултирате с помощната система няколко пъти.