Cабақтың тақырыбы:Процедуралар
Сабақтың мақсаты:
Білімділік: Процедуралар туралы түсінікті беру. Оның негізігі
жұмыс істеу және атқару қызметтері туралы мағлымат беру.
2. Тәрбелік: Оқушылардың сабаққа деген қызығушылығын,
бейімділігін ояту
3. Дамыту: Логикалық ойлау қабілеттерін дамыта отырып, білім білік
дағдыларын қалыптастыру. Өз бетімен жұмыс істеуі, шығармашылық қабілетін дамыту.
Сабақтың әдіс-тәсілдері: түсіндіру, ой қозғау, мағынаны ашу, өз бетімен жұмыс, жеке жұмыс.
Көрнекіліктер: компьютер, VB программа ортасы.
Сабақтың барысы:
І. Ұйымдастыру кезеңі: Сергіту сәті. Оқушыларды сабаққа психологиялық тұрғыда дайындау.
Сендерге мынадай жаңа технологияға байланысты тілегім бар.
Компьютер сенің көмекшің,
Қазығың әрі қаламың,
Керек емес демессің
Аздаған болса хабарың,
Үйрену керек бәрінде
Ақпараттық заманың.
ІІ. Үй тапсырмасын тексеру
«Білімге бойлау» бөлімі сұрақтарға жауап беру
Visual Basic программасы қай жылы шықты?
Qbasic тілі негізінде 1991 жылы дайындалып, соңғы нұсқасы (Visual Basic 6.0) 1999 жылы жарық көрді. Vb5.0 және VB6.0 нұсқаларының айырмашылығы көп емес.
Visual Basiс бағдарламасы неше қосымша бет терезеден тұрады?
үш қосымша беттен тұрады: New (жаңа жобалар), Existing (Қолданыстағы жобалар), Recent (Жақында пайдаланылған жобалар).
Осы бағдарламаны іске қосу үшін қандай амалдарды орындау қажет?
Пуск→ Программы→ Microsoft Visual Basic 5.0 → Microsoft Visual Basic 5.0
Visual Basiс-тің терезесі қандай беттен тұрады?
2 терезеден тұрады Пішін терезесі және Жоба терезесі
Қасиет дегеніміз — …
Объектінің сипаттамаларын (өлшемі, түсі, экрандағы жағдайы) немесе объектінің күйін (мысалы, қол жетерліктігі немесекөрнекіліктігі) белгіленетін объект атрибуты
Label басқару элементі …
Caption қасиеті жоқ жазуларды, мысалы, тақырыптарды бейнелеу үшін қолданылады
Пішін макетінің терезесі — …
қолданба жұмысы кезінде экранының қай бөлігін алатынын бағалауға көмектеседі
TextBox басқару элементі …
мәтін енгізу үшін қолданылады, әрі қарай ол бағдарламада немесе оған бағдарлама есептерінің нәтижелерін шығару үшін қолданылады;
Оқиға дегеніміз — …
Объектінің сипаттамаларын (өлшемі, түсі, экрандағы жағдайы) немесе объектінің күйін (мысалы, қол жетерліктігі немесекөрнекіліктігі) белгіленетін объект атрибуты
Айнымалы дегеніміз …
уақыттық шаманы сақтауға арналған жад аймағын белгілейтін шама
CommandButton басқару элементі …
батырманы басумен шақырылатын кейбір эркеттердің орындалуын инициалдау үшін (мысалы, бағдарламаны іске қосу немесе оның орындалуын тоқтату, нәтижелерді басып шығару және т.б.) қолданылады
Ғ5 батырмасының қызметі
бағдарламаның орындалуын бастайды;
ІІІ. Жаңа сабақ түсіндіру.
Процедуралар.
Процедура дегеніміз – Sub және End Snb түйін сөздері арасында жасалған және өзаты бар бағдарламалық кодтың блогы. Процедура (немесе он.ы бағыныңқы программа деп те атайды ) өзәне кіретін нұсқауларды орындайды және оған берілетін аргументтердің мәндерін өзгертеді. Аргументтер деп процедураға берілетін айнымалылар аталады.Кейбір процедуралардың берілетін аргументтері болмайды.
Синтаксис :
[Private/Public/] [Static] Sud Имя Процедуры
[(Аргументы)]
Код процедуры
End Sub
_______________________________________________________________
Public Процедураның бүкіл қолданбада қол жетерлің көріну
аймағына нұсқайды.
Private Процедураның сол модульдегі барлық басқа процедуралар және
қызметтер үшін қол қолжетерлік көріну аймғына нұсқайды.
Static Жергілікті айнымалы процедуралар сол
процедураны шақырулар арасындағы уақыт аралықтарында
сақтлатынына нұқсқайды.
Имя процедуры- Процедураның бірігей аты.
Аргументы – үтірлермен бөлінген аргументтер тізімі. Процедураға
мәндер өздері енгізіледі.
__________________________________________________________________
Мысалы: Private Sub Command1_Click()
MsgBox «Процедура орындалды»
End Sub
Практикалық жұмыс
№ 1. Қолданушының неше символ енгізгенін есептейтін қосымша құру
Private Sub Command3_Click()
x = Text1.Text
Label2.Caption = Str(Len(x))
End Sub
№ 2. у=(а+b)/2 өрнегін есептейтін қосымша құру
Visual Basic ортасын іске қосыңдар. Жобаны сақтап қойыңдар.
Пішінге Label1, Label2, Command1, Command2, Text1 басқару элементтерін орнатыңдар. Ол келесі суреттегідей орналастырылсын.
Басқару элементтерінің келесідей қасиеттерін орнатыңдар:
Объект
Объект аты
Қасиеті
Мәні
Пішін
Form1
Caption
у=0.3*х + 5*х^2 өрнегін есептеу
Жазу
Label1
Caption
Бос
Басқару батырмасы
Command1
Caption
Есептеу
Басқару батырмасы
Command2
Caption
Тазалау
Мәтін өрісі
Text1
Text
Бос
Жазу
Label2
Caption
X=
Сommand1 басқару элементін екі рет шертіп, кодтар терезесінде берілген өрнекті есептейтін мына төмендегі процедураны толтырыңдар:
Private Sub Command1_Click()
x = Val(Text1.Text)
Y = (a+b)/2
Label1.Caption = «Y=» + Str(Y)
End Sub
Сommand2 басқару элементін екі рет шертіп, келесі кодты теріңдер:
Private Sub Command2_Click()
Text1.Text = » »
End Sub
Қосымшаны іске қосыңдар, сөйтіп нәтижені алыңдар
№ 3. «Калькулятор» қосымшасын құру
Жұмысты орындау реті:
1. Visual Basic ортасын іске қосыңдар. Жобаны сақтап қойыңдар.
2. Пішіннің Caption қасиетіне Калькулятор мәнін меншіктеңдер.
3. Пішінге Text1 және CommandButton басқару элементтерін орналастырыңдар.
Command1 батырмасы:
Dim c, s, sim
Private Sub Command1_Click()
Text1.Text = Text1.Text + «1»
c = Text1.Text
End Sub
Private Sub Command6_Click()
Text1.Text = » »
End Sub
Command7 батырмасы:
Private Sub Command7_Click()
s = Val(c)
Text1.Text = » »
sim = «+»
End Sub
Command9 батырмасы:
Private Sub Command9_Click()
Select Case sim
Case «+»
Text1.Text = s + Val(c)
Case «-»
Text1.Text = s — Val(c)
End Select
End Sub
Өз беттеріңше «Калькулятор» программасына қалған батырмаларды қосып, — сандарын және «-», «*», «/» математикалық амалдарын толықтырыңдар. Сәйкесінше, программалық код жазыңдар.
Қосымшаны іске қосыңдар (Start немесе F5).
Бекіту сұрақтары:
1. Процедура дегеніміз не?
2. Процедураның құрылымын атаңыз
3. Аргументтер дегеніміз не?
V. Бағалау
VІ. Үйге тапсырма беру
у=(а*b)-2 өрнегін есептейтін қосымша құру
VІІ. Рефлексия
Сабақтағы өз жұмысымды қалай бағалаймын
Шаршағандық, мазасыздық сезімдеріңіз бар ма?
Сабақтан сергектік пен қанағаттанарлық нәтиже алдым ба?
Практикалық жұмыс
№ 1. Қолданушының неше символ енгізгенін есептейтін қосымша құру
Private Sub Command3_Click()
x = Text1.Text
Label2.Caption = Str(Len(x))
End Sub
№ 2. у=(а+b)/2 өрнегін есептейтін қосымша құру
Visual Basic ортасын іске қосыңдар. Жобаны сақтап қойыңдар.
Пішінге Label1, Label2, Command1, Command2, Text1 басқару элементтерін орнатыңдар. Ол келесі суреттегідей орналастырылсын.
Басқару элементтерінің келесідей қасиеттерін орнатыңдар:
Объект
Объект аты
Қасиеті
Мәні
Пішін
Form1
Caption
у=0.3*х + 5*х^2 өрнегін есептеу
Жазу
Label1
Caption
Бос
Басқару батырмасы
Command1
Caption
Есептеу
Басқару батырмасы
Command2
Caption
Тазалау
Мәтін өрісі
Text1
Text
Бос
Жазу
Label2
Caption
X=
Сommand1 басқару элементін екі рет шертіп, кодтар терезесінде берілген өрнекті есептейтін мына төмендегі процедураны толтырыңдар:
Private Sub Command1_Click()
x = Val(Text1.Text)
Y = (a+b)/2
Label1.Caption = «Y=» + Str(Y)
End Sub
Сommand2 басқару элементін екі рет шертіп, келесі кодты теріңдер:
Private Sub Command2_Click()
Text1.Text = » »
End Sub
Қосымшаны іске қосыңдар, нәтижені алыңдар
№ 3. «Калькулятор» қосымшасын құру
Жұмысты орындау реті:
1. Visual Basic ортасын іске қосыңдар. Жобаны сақтап қойыңдар.
2. Пішіннің Caption қасиетіне Калькулятор мәнін меншіктеңдер.
3. Пішінге Text1 және CommandButton басқару элементтерін орналастырыңдар.
Command1 батырмасы:
Dim c, s, sim
Private Sub Command1_Click()
Text1.Text = Text1.Text + «1»
c = Text1.Text
End Sub
Private Sub Command6_Click()
Text1.Text = » »
End Sub
Command7 батырмасы:
Private Sub Command7_Click()
s = Val(c)
Text1.Text = » »
sim = «+»
End Sub
Command9 батырмасы:
Private Sub Command9_Click()
Select Case sim
Case «+»
Text1.Text = s + Val(c)
Case «-»
Text1.Text = s — Val(c)
End Select
End Sub
Өз беттеріңше «Калькулятор» программасына қалған батырмаларды қосып, — сандарын және «-», «*», «/» математикалық амалдарын толықтырыңдар. Сәйкесінше, программалық код жазыңдар.
Қосымшаны іске қосыңдар (Start немесе F5).