Графикалық әдістер арқылықы графиканы құру

Қарағанды техникалық университеті

ӨПА кафедрасы

Зертханалық жұмыс №4

Пәні: Бағдарламалау тәсілдері мен технологиялары

Тақырыбы: Графикалық әдістер арқылықы графиканы құру

6 - нұсқа

Орындаған: АиУ-20-2 т.cт. Қабенов Қ.А.

Тексерген: Жумагулова Д.К.

Қарағанды 2021

Жұмыстың мақсаты: VB – бағдарламасында графикалық әдістер арқылы графикі құрып үйрену

Жұмыстың барысы:

Өз нұсқам бойынша берілген графикті ВБ бағдарламасында құру

6 – нұсқа Қарапайым бағдаршамның графигін тұрғызу

[pic 1]

Объект қасиеттерінің мәні

Программа листингі

Private Sub Command1_Click()

    Svetofor

End Sub

Public Sub Svetofor()

Form1.Line (66, 5)-(66, 6)

Form1.Line (67, 4)-(67, 7)

Form1.Line (68, 4)-(68, 7)

Form1.Line (69, 4)-(69, 7)

Form1.Line (70, 4)-(70, 7)

Form1.Line (71, 4)-(71, 106)

Form1.Line (72, 4)-(72, 106)

Form1.Line (72, 187)-(72, 200)

Form1.Line (73, 3)-(73, 106)

Form1.Line (73, 187)-(73, 200)

Form1.Line (74, 3)-(74, 106)

Form1.Line (74, 187)-(74, 200)

Form1.Line (75, 3)-(75, 106)

Form1.Line (75, 187)-(75, 200)

Form1.Line (76, 3)-(76, 106)

Form1.Line (76, 187)-(76, 200)

Form1.Line (77, 3)-(77, 106)

Form1.Line (77, 187)-(77, 200)

Form1.Line (78, 2)-(78, 106)

Form1.Line (78, 187)-(78, 200)

Form1.Line (79, 2)-(79, 106)

Form1.Line (79, 187)-(79, 200)

Form1.Line (80, 2)-(80, 23)

Form1.Line (80, 24)-(80, 56)

Form1.Line (80, 57)-(80, 88)

Form1.Line (80, 89)-(80, 106)

Form1.Line (80, 187)-(80, 200)

Form1.Line (81, 2)-(81, 19)

Form1.Line (81, 28)-(81, 52)

Form1.Line (81, 61)-(81, 84)

Form1.Line (81, 93)-(81, 106)

Form1.Line (81, 187)-(81, 200)

Form1.Line (82, 2)-(82, 17)

Form1.Line (82, 29)-(82, 50)

Form1.Line (82, 62)-(82, 82)

Form1.Line (82, 94)-(82, 106)

Form1.Line (82, 187)-(82, 200)

Form1.Line (83, 1)-(83, 16)

Form1.Line (83, 30)-(83, 49)

Form1.Line (83, 63)-(83, 81)

Form1.Line (83, 95)-(83, 106)

Form1.Line (83, 187)-(83, 200)

Form1.Line (84, 1)-(84, 15)

Form1.Line (84, 31)-(84, 48)

Form1.Line (84, 64)-(84, 80)

Form1.Line (84, 96)-(84, 106)

Form1.Line (84, 187)-(84, 200)

Form1.Line (85, 1)-(85, 14)

Form1.Line (85, 32)-(85, 47)

Form1.Line (85, 65)-(85, 79)

Form1.Line (85, 97)-(85, 106)

Form1.Line (85, 187)-(85, 200)

Form1.Line (86, 1)-(86, 13)

Form1.Line (86, 33)-(86, 46)

Form1.Line (86, 66)-(86, 78)

Form1.Line (86, 98)-(86, 106)

Form1.Line (86, 187)-(86, 200)

Form1.Line (87, 1)-(87, 13)

Form1.Line (87, 33)-(87, 46)

Form1.Line (87, 66)-(87, 78)

Form1.Line (87, 98)-(87, 106)

Form1.Line (87, 187)-(87, 200)

Form1.Line (88, 1)-(88, 12)

Form1.Line (88, 34)-(88, 45)

Form1.Line (88, 67)-(88, 77)

Form1.Line (88, 99)-(88, 106)

Form1.Line (88, 187)-(88, 200)

Form1.Line (89, 1)-(89, 12)

Form1.Line (89, 34)-(89, 45)