Каеоукрнжеклднщ?кнро

Сабақ тақырыбы: Visual Basic for Application интерфейсі

Сабақ мақсаты:

1. Білім берушілік Visual Basic for Application интерфейсі

Образовательная бойынша білімдерін қалыптастыру.

1. Дамытушылық есте сақтау, ойлау қабілетін дамыту

Развивающая

1. Тәрбиелік Жинақтылыққа және жауапкершілікке тәрбиелеу

Воспитательная

Сабақ түрі: аралас

Сабақ өткізу әдісі: білім-білік дағдыларын қалыптастыру

Пән аралық байланыс: математика

Сабақтың жабдықталуы: Жұмыс дәптері, ДК

Сабақтың барысы

1.Ұйымдастырушылық кезен Аудитория әзірлігін тексеру, оқушыларды түгендеу

2.Тақырып бойынша негізгі білім өзектілігі

1. Редактор терезесі қандай элементтерден тұрады?

2. Құрал-саймандар тақтасы қандай топтарға бөлінген?

3. Жоба терезесі деген не және бұл терезеде қандай мәліметтер орналасқан?

4. Қасиеттер терезесі және объектілерді көру терезесі не үшін қолданылады?

3. №1 тәжірибелік жұмысты орындау

Тақырып: Мicrosoft Visual Basic интерфейсі

Мақсаты: MS Office қолданбасында Visual Basic программалау ортасын тез әдіспен шақыруға үйрену. Оның қолданысын MS Excel элементарлы деңгейде көрсету. VB интерфейсінде басқару элементінің тағайындалуын түсіндіру. Сызықтық алгоритм түріндегі есеп шығару.

1. MS Visual Basic интерфейсі.

MS Excel –де Visual Basic for Application көмегімен сызықтық алгоритм түріндегі ою макросын құру.

1. Visual Basic программасын жүктелуі.

   1. MS Excel бағдарламасын Бастау/Бағдарламалар/Excel бас меню арқылы жүктеу (Пуск/Программы/Excel).

   2. Өзіңіздің буманызда файлды Калейдоскоп.xls (Файл/Сохранить) деп сақтаңыз.

   3. Visual Basic for Application (VBA) бағдарламаау жүйесі. MS Windows қосымшаларында макростарды құруға арналған жайлы болып табылады. Бағдарламаны шақыру үшін: MS Office ортасын ашу, ALT +F11 немесе Сервис/Макрос/Редактор Visual Basic

      Бастапқы бірінші бағандардың енін 1 см дейін кішірейтіңіз: ол үшін 1)А:Н бағандарын белгілеңіз, 2) А және В бағандардың ортасына тышқан нұсқағышын апарыңыз, 3) солға қарай жылжытыңыз.

   4. Visual Basic бағдарлама терезесін ALT + F11 пернелерін басу арқылы шақырыңыз.

   5. Эранда стандартты түрде тақырып жолы, меню жолы, Құралдар тақтасы, Проект (Project) терезесі, Қасиеттер (Свойства –Properties) терезесі пайда болады. Тереземен танысып, өздерін үшін белгілеп алындар.

      

   6. Егер де экранда басқа да терезесі немесе керісінше аталғандар жоқ болса, онда Құралдар тақтасынан бір атты батырмаларды тауып алыңдар View пунктін таңдап жетіспейтін батырмаларды таңдаңдар. Артық терезелерді жабыңдар.

1. VBA интерфейсі.

   1. Меню жолындағы әрбір пункті ашу арқылы олардың тағайындалуымен танысыңдар. Анықтаманы шақырыңдар (Help/Справка Содержание) қосымшасында (Menus) пунктін тауып, оларды оқу керек. (болашата анықтаманы пайдаланыңдар).

   2. Құралдар тақтасындағы батырмаларға тышқан нұсқағышын апару арқылы әрбір батырманының тағайындалуын дәптерлеріңе жазып алыңдар.

   3. Project терезесінде Проводник терезесін еске түсіретін әдетте Excel файлында автоматты түрде орналасатын объектілерді анықтаңдар. (мысалы, Лист 1, .., ЭтаКнига).

      

   4. Бұл терезеде құралдар тақтасы орналасқан. Лист1 объектісін таңдап View Code (просмотр программы) бірінші батырманы шертіңіз, оң жақтағы терезеде программа коды өңделеді.

   5. View Object (просмотр объекта) келесі батырманы басыңыз. Сіз формаға өттіңіз, ал бұл бағдарлама орындалғанда орындалатын әрекет объект болып табылады. Бұл Лист1.

   6. Есептер тақтасындағы (экранның төменгі жағыдағы)VBA-ға қайта оралыңыз.

   7. Тақырып жолындағы проект атын және сызықшадан кейін объект атын оқыңыз. Properties терезесіндегі қасиеттерді қараңыз.

      

   8. Лист1 жолын басу арқылы ең негізгі объект қасиетіндегі (Name) атын өзгертіңіз. Оны өшіріп, Рабочий деген ат беріңіз. Тақырып жолында автоматты түрде аты өзгертілді.

   9. Объекті терезесіндегі ЭтаКнига объектісінің қасиеттерін қарап шығыңыз.

   10. Бағдарлама интерфейсі: Тақырып жолы редакторы және жобаның атынан тұрады, Меню жолында бағдарламада орындалатын барлық әрекеттер бар. Құралдар тақтасы, Object терезесі бұтақ түрінде берілген жобаның барлық объектісін айқындайды. Properties терезесі Object терезесінде белгіленген объектінің барлық қасиеттерін белгілейді.

       Рабочий терезе кодын жабыңыз.

1. Модулді қосу

   1. Insert менюінде Module(модуль) әрбір беттен баптауға болатын кодтан тұратын жаңа объект құрыңыз.

   2. project терезесінде оның орналасқан жерін табыңыз.

   3. Properties терезесінде Модуль объектісінің қасиетін қараңыз.

   4. Бағдарлама құруға арналаған Код терезесіне шертіңіз (процедура бөлімінде).

   5. Модуль Бағдарламалық коды бар мәтіндік файл. Бағдарламада қолданылатын өзара байланысқан процедураларды біріктіруге ыңғайлы. Модуль құу: Project терезесінде объектіні белгілеңіз, макрос файлын Insert/Module, Ескерту: контекстік меню арқылы құрған ыңғайлы. Name қасиетін өзгерт, Код терезесінде процедура мәтінін енгізу

      Процедура бастамасын Sub түйінді сөзімен жазыңыз. Бос орын арқылы процедура атын Узор() деп жазыңыз, мұндағы жақшалар берілген айнымалылар (аргументтер).

   6. Enter-ді басыңыз. Меңзер келесі жолға түседі, бірақ автоматты түрде процедураны аяқтайтын End Sub сөзі пайда болады.

   7. Процедура тұлғасының бастапқы жолын теріңіз Range(“A1”), А1 ұяшығын айқындайды.

   8. Нүктені басқаннан кейін VBA автоматты түрде объектіге сәйкес қасиет тізімін ұсынады. Асықпаңыз, қасиеттің бірінші І әрпін басыңыз. Interior (содержимое) қасиетін таңдаңыз.

   9. Тағы да нүктені теріп, ColorIndex қасиетін таңдаңыз.

   10. Соңғы қасиетке Rnd() функциясы арқылы мән тағайындаңыз 0-ден 1-ге дейін кездейсоқ санның генерациясы.

       

   11. Бірақ бұл сан өте аз, оны 8-ге көбейту керек.

       

   12. Суреттегі сияқты бұл жолды ерекшелеңіз. Алмастыру буферіне көшіріп алыңыз, констекстік меню арқылы Copy таңдаңыз.

   13. Меңзерді бір жол төмен орналастырыңыз. Та Алмастыру буферінен берілгенді 7 рет көшіріңіз, бірақ ұяшықтың адресіне өзгертіңіз.

       Sub Узор()

       Range("A1").Interior.ColorIndex = Rnd() * 8

       Range("B1").Interior.ColorIndex = Rnd() * 8

       Range("C1").Interior.ColorIndex = Rnd() * 8

       Range("D1").Interior.ColorIndex = Rnd() * 8

       Range("A2").Interior.ColorIndex = Rnd() * 8

       Range("B2").Interior.ColorIndex = Rnd() * 8

       Range("C2").Interior.ColorIndex = Rnd() * 8

       Range("D2").Interior.ColorIndex = Rnd() * 8

       
       

       Range("A1").Copy: Range("H1").PasteSpecial

       Range("B1").Copy: Range("G1").PasteSpecial

       Range("C1").Copy: Range("F1").PasteSpecial

       Range("D1").Copy: Range("E1").PasteSpecial

       
       

       Range("A2").Copy: Range("H2").PasteSpecial

       Range("B2").Copy: Range("G2").PasteSpecial

       Range("C2").Copy: Range("F2").PasteSpecial

       Range("D2").Copy: Range("E2").PasteSpecial

       
       

       Range("A1:H2").Copy: Range("A3").PasteSpecial

       Range("A1:H4").Copy: Range("A5").PasteSpecial

       Range("A1:H8").Copy: Range("A9").PasteSpecial

       Range("A1").Select

       
       

       End Sub

   14. Процедура Sub …End Sub түйінді сөздерімен белгіленген бағдарлама кодының аттас бөлігі. Мысалы,: , мұндағы Узор() – процедура аты, Range("A1").Select – процедура тұлғасы.

       Жұмысты өздігінен орындаңыз.

   15. Екінші блокта әдіс көмегімен (т.е. стандартной команды действия) Copy атымен рет-ретімен көшіру басталады бірінші тізімдегі 4 тор. PasteSpecial әдіс көмегімен тор адрестеріне сәйкес қою басталады.

   16. Өздігінене үшінші және төртінші блоктарды шешіңіз. Select әдісі – бұл берілген ұяшық диапазонның ерекшеленуі.

2. Макростың орындалуы

   1. Excel терезесіне ауысыңыз (есептер тақтасы арқылы немесе View Object терезесіндегі Project).

      

   2. Макрос диалогтік терезесін шақырыңыз Сервис/Макрос/Макрос.

   3. Узор деген атты тағайындаңыз. Орындау(Выполнить).

   4. 4.3. пунктін бірнеше рет қайталаңыз.

1. Өздік жұмысы.

   1. Макросты құру және орындау.

      1. Берілген модулде Цветок() процедурасын құрыңыз.

4. Бекіту

1. Редактор терезесі қандай элементтерден тұрады?

2. Құрал-саймандар тақтасы қандай топтарға бөлінген?

3. Жоба терезесі деген не және бұл терезеде қандай мәліметтер орналасқан?

4. Қасиеттер терезесі және объектілерді көру терезесі не үшін қолданылады?

5. Үй тапсырмасы конспект оқу