Презентация, доклад на тему Visual Basic программалау ортасы. TextBox, Label, CommandButton компоненттерін пайдаланып қосымша жасау.

Ж о с п а р ы : І. Ұйымдастыру кезеңі.ІІ. Үй тапсырмасын сұрау.ІІІ. Практикалық жұмыс а) Бағдарлама құру ә) Есептің шартын анықтауІV. Тест жұмысыҚорытынды. Үйге тапсырма

Слайд 1Қ. Мұхамеджанов атындағы
№1 мектеп – гимназия
Т а қ ы р

ы б ы : TextBox, Label, CommandButton компоненттерін пайдаланып қосымша жасау.

Класс: 10 “б”

Қызылорда қаласы

Ашық сабақ

Қ. Мұхамеджанов атындағы №1 мектеп – гимназияТ а қ ы р ы б ы : TextBox, Label,

Слайд 2Ж о с п а р ы :
І. Ұйымдастыру кезеңі.
ІІ.

Үй тапсырмасын сұрау.
ІІІ. Практикалық жұмыс
а) Бағдарлама құру
ә) Есептің шартын анықтау
ІV. Тест жұмысы
Қорытынды.
Үйге тапсырма
Ж о с п а р ы : І. 		Ұйымдастыру кезеңі.ІІ.   Үй тапсырмасын сұрау.ІІІ.

Слайд 3

1. TextBox компоненті және оның

негізгі қасиеттері.













1. Name
2. Text
3. DataSource
4. DataField
5. Locked
6. MaxLength
7. MultiLine
8. Alignment
9. BoldarStyle
10. ScrollBar
11. Font
12. ForeColor
13. BackColor
14. Tablndex
15. TabStop
16.Enabled, Visibled




CommandButton компоненті
және оның негізгі
қасиеттері.













1. Caption
2. Text
3. BackColor
4. Picture
5. DisabledPicture
6. DownPicture
7. Style
8. Cancel
9. Default




1. Label компоненті және оның
негізгі қасиеттері.












1. Caption
2. AutoSize
3. WordWrap
4. BolderStyle

1.  TextBox компоненті және оның 	  	    негізгі қасиеттері.   		1.

Слайд 4№2 есеп Тік төртбұрыштың ауданын табу қосымшасын жасау.

№2 есеп Тік төртбұрыштың ауданын табу қосымшасын жасау.

Слайд 5Private Sub Command1_Click()
a = Val(Text1.Text)
b = Val(Text2.Text)
S = a * b
Label3.Caption

= "S=" + Str(S)
Label3.Visible = True
End Sub


Private Sub Command2_Click()
Label3.Visible = False
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
End Sub..\2- -есеп.exe
Private Sub Command1_Click()a = Val(Text1.Text)b = Val(Text2.Text)S = a * bLabel3.Caption =

Слайд 6Private Sub Command1_Click() x = Val(Text1.Text) y = Val(Text2.Text) H = Abs(x) - (Abs(y))

/ (1 + Abs(x * y)) Label3.Caption = "H=" + Str(H) Label3.Visible = True End Sub 10 klass.frm

Есептің шартын анықтаңыз.

Private Sub Command1_Click() x = Val(Text1.Text) y = Val(Text2.Text) H = Abs(x) - (Abs(y)) / (1 +

Слайд 7Программалау - екінші сауаттылық.
А. П. Ершов



Программалау - екінші сауаттылық.						А. П. Ершов

Что такое shareslide.ru?

Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.


Для правообладателей

Яндекс.Метрика

Обратная связь

Email: Нажмите что бы посмотреть