Ашық сабақ Визуальды бағдарламалау жүйесінде геометриялық фигураларды салу

Сабақтың тақырыбы: Визуальды бағдарламалау жүйесінде геометриялық фигураларды салу.

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

Білімділік мақсаты:

• Графикалық әдістің синтаксисін үйрену;

• Бағдарламалау тілінде координаталық жазықтықта жұмыс істеуге дағдылану;

• Күрделі және қарапайым есептеу кескіндерін салу үшін графикалық әдісті қолдануды үйрену.

Дамытушылық мақсаты: Танымдық ойлау қабілетін, ой-өрісін, есте сақтау қабілетін дамыту, өз бетімен жұмыс істуге дағдыландыру, пәнге деген қызығушылығын, белсенділігін арттыру.

Тәрбиелік мақсаты: Өз бетімен жұмыс жасауға, еңбекке тәрбиелеу.

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

1. Ұйымдастыру.

Оқушыларды түгендеу, құрал жабдықтарын тексеру.

2. Үй тапсырмасы.

Өткен сабақтты қайталау.

Сабақтың түрі: практикалық сабақ.

Сабақтың көрнекілігі: практикалық таратпа тапсырмасы.

Қасиет, әдіс және оқиға

Объект қасиеті- бұл суреттің ұзындығы , ені, түсі, және т.с.с.

Оқиға- объектіге сыртқы ықпал жасау: тышқанмен шерту, тышқанмен екі рет шерту, бір орыннан басқа орынға тасу және т.с.с.

Әдіс- Берілген объектіге визуальды бағдарламалау жүйесі орындай алатын, бірнеше іс-әрекеттер. Бұл әрекет визуальды бағдарламалау жүйесінде ерекше орындалады.

Жазбаның синтаксистік құрылымы және ережесі.

Бірінші кезекте объектінің аты жазылады, одан кейін нүкте қойылады, сонында әдіс немесе қасиет жазылады.

Мысалы;

Объект.Қасиет - Picture1.DrawWidth- сурет енінің қасиеті.

Text1.text- text қасиеті.

Объект.Әдіс - Picture1.Scale - масштабтау әдісі.

Графикалық әдіс графикалық терезеде және формада қолданылады. Формада кескін құру үшін, координата жүйесін белгілеп алу қажет.

Ж

0,0аңа координата жүйесін құру үшін Scale әдісінің көмегімен қарама-қарсы бұрыштарын сандық мәнмен көрсету қажет.

Оны формада келесідей синтаксистік түрде көрсетуге болады: Form1-Scale(0,0)-(20,20)

Графикалық терезедегі синтаксис түрі мынадай:

Picture1.Scale (0,0)-(20,20)

Осы екі жағдайда да Y осі төменге бағытталады.

Е

0,0гер координа жүйесі әдеттегідей жазықтықта 20*20 болуы үшін, төмендегідей жазу керек:

Form1-Scale(-10,10)-(10,-10)

Picture1.Scale (-10,10)-(10,-10)

Графикалық әдіске төмендегілер жатады:

1. Scale-жаңа координата жүйесі.

2. Pset- салынатын нүкте.

Графикалық терезе және форманың синтаксисі:

Picture1.Pset(x,y), 255 Picture1.Pset(x,y), vbRed

Form1.Pset(x,y),255 Form1.Pset(x,y),vbRed

Мұндағы x,y- координата нүктесі, 255- ол түс, түсті сан түрінде де және VbRed(қызыл түс) тұрақты ретінде беруге болады.

тұрақты

Сан

VbBlack - қара түс

0

VbRed - қызыл түс

255

VbGreen - жасыл түс

65280

VbYellow - сары түс

65535

VbBlue - көк түс

16711680

VbMagenta - акшыл көк түс

16776960

VbCyan- көгілдіртүс

16776960

VbWhite - ақ түс

16777215

Түс берудің тағы бір жолы -RGB функциясы, бұл функцияның ең үлкен мәні 256³, яғни 16777216 санына тең.

Синтаксис:

Form1.Pset(x,y),RGB(255,65535,16776960)

Picture1.Pset(x,y), RGB(255,65535,16776960)

3. Line- сызық, тікбұрыш, боялған тікбұрыш салу үшін қолданылады.

Синтаксис:

Picture1.Line(x,y)-(x1,y1), түс, B F

Кесінді+В

Берілген түстін контуры+F

Боялған тік бұрыш

Мұнадығы x,y және x1,y1- тіктөрбұрыштың 1 кесіндісінің координатасы, 255- түс, В параметрі- тікбұрыштың контурын салу үшін қолданылады, F параметрі- боялған тікбұрыш салу үшін қолданылады, егерде B және F параметрлері көрсетілмесе, онда тек ғана кесінді салынады.

4. Circle- шеңбер, доға немесе сектор, элипс салу үшін қолданылады.

k<1

k>1

Синтаксис:

Picture1.Circle(x.y),r, түс, 1- бұрышы, 2-бұрышы,k

Шеңбер+1-бұрышы, 2-бұрышы

Шеңбердің доғасы немесе секторы + k (сығу(қысу) коэффиценті)

Шеңбердің доғасы немесе секторы; егер бұрыштары көрсетілмесе, вертикал немесе горизонталы бойынша созылған элипс салынады.

Мұндағы х,у-координата ортасы, r- радиустың ұзындығы, түс- ереже бойынша беріледі, ары қарай эллипсті тұрғызу үшін параметрлер көрсетілген, 1-бұрыш, 2-бұрыш- ол доғаның немесе сектордың басқы және соңғы бұрышы, бұрыштар радианмен өлшенеді. Егер бұрыштың мәнінің алдында «-» минус таңбасы тұрса, онда доға емес, сектор салынады.

Шеңбер, элипс немесе сектордың түспен толтырылған бейнесін алу үшін, келесідей графикалық терезенің қасиетін пайдалану қажет:

ForeColor- контурдың түсі (тұрақтымен немесе санмен беруге болады)

FillStyle- толтыру стилі (0-ден бастап 6-ға дейін)

FillColor- толтыру түсі (тұрақтымен немесе санмен беруге болады)

Тапсырма №1

Picture1 графикалық терезеде төртбұрыш, боялған төртбұрыш, шеңбер, доға, сектор, эллипс салудың жобасын құрыңыз.

Private Sub Command1_Click()

Графикалық терезені масштабтау

Picture1.Scale (0, 0)-(20, 20)

Кесінді салу

Picture1.DrawWidth = 3

Picture1.Line (3, 3)-(10, 3), vbRed

Picture1.Line (10, 3)-(6, 6), vbRed

Picture1.Line (6, 6)-(3, 3), vbRed

Нүкте салу

Picture1.DrawWidth = 10

Picture1.PSet (3, 3), vbRed

Picture1.Print "A"

Picture1.PSet (10, 3), 255

Picture1.Print "B"

Picture1.PSet (6, 6), 255

Picture1.Print "C Фигура №1"

Төртбұрыш салу

Picture1.DrawWidth = 5

Picture1.Line (12, 3)-(17, 6), vbCyan, B

Picture1.Print "Фигура №2"

төртбұрышты бояу

Picture1.DrawWidth = 5

Picture1.Line (3, 8)-(6, 10), vbCyan, BF

Picture1.Print "Фигура №3"

Боялған төртбұрыш ішіне сөз жазу

Picture1.Line (12, 8)-(15, 10), vbCyan, BF

Picture1.Line (15, 10)-(12, 8), vbCyan, BF

Picture1.Print "Фигура №3"

Шеңбер салу

Picture1.Circle (2, 5), 1.2, 255

Доға салу

Picture1.Circle (7, 15), 1.2, 255, 0, 3.14

Сектор салу

Picture1.Circle(11,15), 1.2, 255, -1, -3

Эллипс салу

Picture1.Circle(14,15), 1.2, 255,,,0.5

Picture1.Circle(17,15), 1.2, 255,,,1.5