Microsoft Visual Basic

2

3

4

5

6

7

8

9

10

11

1 – Pointer
2 – Label
3 – Checkbox
4 – ComboBox
5 – ListBox
6 – TextBox
7 – OptionButton
8 – Timer
9 – FileListBox
10 – Image
11 – Shape

13

14

15

16

17

18

19

20

21

12 – VScrollBar
13 – DriveListBox
14 – HScrollBar
15 – OLE
16 – Frame
17 – Line
18 –DirListBox
19 –CommandButton
20 – PictureBox
21 – Data

2-ші алаңға оның квадратын шығару.
1.Формаға Text1,Text2 компонентін түсіріп,оның Text қасиетін

тазала.
2.Формадан Text1 компонентін 2 рет Text1_Change процедурасына өтіп,оны толтыр.
Private sub Text1_Change()
A=val(text1.text)
Text2.text=a*a
End sub
Run командасын орындап,нәтижесін көр.

шығару.
1.Форманың Caption қасиетіне y=50x+7x+5+10+15x мәнін бер. Font комплексті қасиетін ашып,

шрифт өлшемін 14 етіп орнат.
2.Формаға Text1 компонентін түсіріп,оның Text қасиетін тазала.
3.Text1 компонентінің жанына Label1 компонетін түсіріп, Caption қасиетіне Х= мәнін бер.
4.Text1 компонентінің астына Command1 компонетін түсіріп, Caption қасиетіне ОК мәнін бер.
5. Label2 компонетін түсіріп, autosize қасиетіне true мәнін,visible қасиетіне false мәнін бер.
6.Программалық кодта Command1_click() процедурасына өтіп,оны толтыр.
Private sub Command1_click()
X=val(text1.text)
Y=50*x+7*x+5+10+15*x
Label2.caption=”y=”+str(y)
Label2.vizible = true
End sub
7. Run командасын орындап,нәтижесін көр.

ауданын шығару.
1.Форманың Caption қасиетіне дөңгелектің ауданын мәнін бер. Font комплексті

қасиетін ашып, шрифт өлшемін 14 етіп орнат.
2.Формаға Text1 компонентін түсіріп,оның Text қасиетін тазала.
3. Text1компонетінің жанына Label1 компонетін түсіріп, Caption қасиетіне R= мәнін бер.
4. Text1компонетінің астына, Label2 компонетін түсіріп, Caption қасиетіне ОК мәнін, Alignmend қасиетіне center мәнін бер.
5.Нәтиже шығару үшін Label3 компонетін түсіріп, Аutosize қасиетіне true мәнін және vizible қасиетіне false мәнін орнат, программа орындалғанда көрінбейтін ету керек.
6.Программалық кодтың General бөлігінде Pi тұрақтысын көрсетіп кету керек.
Const Pi=3.14 (General бөлігін ашу үшін кез келген компонентті 2 рет шерту керек, мысалы Text1 немесе Label1, сол кезде General бөлігі ашылады, сосын жазамыз)
7.Формадан Label2 компонетін екі рет шертіп, Label2_click процедурасына өтіп,оны толтыр.
Private sub Label2_click ( )
R=val(Text1. Text)
S=Pi*R^2
Label3. Caption =”S=”+Str(S)
Label3. vizible = true
End sub
8.Қосымшаны іске қосып орындап көр.

деген не?
5.vizible,enabled- деген не?


6. Visual Basic программасына қандай

командалар арқылы кіреміз?


7.Edit- деген не?
8.Window- деген не?
9.Debug- деген не?
10.File- деген не?
11.Run- деген не?
12. End sub деген не?
13. Private sub деген не?
14. Command1_click( ) деген не?
15.Command, Label компонеттінің тақырып қатары – Caption болса,
Textbox компонеттінің тақырып қатары қандай?

Сұрақтар (қорытындылау)

жазу орнату

шрифт орнату

текст қорабын бояу

обьектіге ат беру

обьектіні өшіру,қосу,обьектіні көзге көрінетін,көрінбейтін ету \true,false\

Пуск – программы – Microsoft Visual Basic 6.0 - Microsoft Visual Basic 6.0

Өшіру, алып тастау, алмастыру

Терезелердің орналасуын реттеу

Қателерді түзету

Файлдарды ашу,жабу,сақтау

Программаны орындау,нәтиже алу

Программа соңы

Программаны жариялау

Command1 оқиғасы

Text

қосымша құрыңыз/