23825

Графічні методи

Лабораторная работа

Информатика, кибернетика и программирование

Створив додаток екранна форма якого містить три об'єкти: командна кнопка з ім'ям ПУСК і два графічних вікна з іменами Picturel і Picture2. Вікно робочого додатка Програмний код для цього додатка: Private Sub Command1_Click Picture1.Line 0 03015 2935 65280 BF Picture2.Scale 0 1010 0 Picture2.

Украинкский

2013-08-05

53 KB

3 чел.

ЗВІТ

з лабораторної роботи № 5

" Графічні методи "

виконав студент IІ курсу відділення МІ група 2  

Киричук Олег Романович 

Дата виконання "3" грудня 2008 р.

Виконання завдань:

1. Створив додаток, екранна форма якого містить три об'єкти: командна кнопка з ім'ям ПУСК і два графічних вікна з іменами Picturel і Picture2. Написав програму, за допомогою якої у графічних полях будуються зображення прапорів двох країн (за вибором).

Вікно робочого додатка

Програмний код для цього додатка:

Private Sub Command1_Click()

Picture1.Line (0, 0)-(3015, 2935), 65280, BF

Picture2.Scale (0, 10)-(10, 0)

Picture2.Line (0, 10)-(10, 0), 65280, BF

Picture2.FillStyle = 0

Picture2.FillColor = vbRed

Picture2.Circle (4, 5), 2, 255

Label3.Caption = "Як ви думаєте, прапори яких країн зображені?"

End Sub

Private Sub Command2_Click()

Label1.Caption = "Лівія"

Label2.Caption = "Бангладеш"

End Sub

2. Написав програму, що вирішує задачу побудови графіка функції y = Sin(t), яка описує зміну інформаційного ресурсу країни у часі. Для визначеності, встановив границі значень аргументу, — всередині відрізка [—p/2, p/2]. Графік побудував не на самій екранній формі, а в графічному вікні екранної форми. Для більшої наочності, побудові графіка передує креслення координатної сітки й осей координат.

Вікно робочого додатка

Програмний код для цього додатка:

Private Sub Form_Load()

Dim i As Integer

Dim x As Single

Dim y As Single

Picture1.Scale (-2, 2)-(2, -2)

Picture1.PSet (0, 0)

Picture1.Print " 0"

Picture1.PSet (-1, 0)

Picture1.Print " -П/2"

Picture1.PSet (1, 0)

Picture1.Print " П/2"

Picture1.PSet (1.75, 0)

Picture1.Print "X"

Picture1.PSet (0, 1.75)

Picture1.Print " Y"

Picture1.Line (-2, 0)-(2, 0)

For i = -1 To 1

   Picture1.Line (i, -2)-(i, 2)

Next i

   Picture1.Line (0, -2)-(0, 2)

For i = -2 To 2

   Picture1.Line (-2, i)-(2, i)

Next i

Picture1.ForeColor = vbRed

   x = -2

   y = Sin(x)

Picture1.CurrentX = x

Picture1.CurrentY = y

For x = -2 To 2 Step 0.005

   y = Sin(x)

   Picture1.PSet (x, y)

Next x

End Sub


 

А также другие работы, которые могут Вас заинтересовать

72913. Социально-психологическая адаптация студентов с различной саморегуляцией поведения 540.38 KB
  Важнейшим социальным требованием к высшим учебным заведениям является ориентация образования не только на усвоение обучающимся определенной суммы профессиональных знаний, но и на развитие его личности, познавательных и созидательных способностей, успешной социализации в обществе и активной адаптации на рынке труда.
72914. Методика расчета объемного гидропривода возвратно-поступательного перемещения (с гидроцилиндром) 2.39 MB
  Предварительный расчет давления в объемном гидроприводе и определении объема насоса. Значения номинального рном допускаемого при работе без ограничения по времени и максимального рмакс давлений которыми обычно задаются исходя из номенклатуры выпускаемых гидроустройств насоса...
72918. Решение системы линейных алгебраических уравнений с вещественными коэффициентами с помощью метода Гаусса 117.93 KB
  Дано: Система линейных алгебраических уравнений. Требуется решить систему линейных алгебраических уравнений с вещественными коэффициентами с помощью метода Гаусса. Существует множество методов решения систем линейных алгебраических уравнений таких как: метод Крамера решение СЛАУ матричным методом метод Гаусса.
72921. Шляхи удосконалення державного регулювання зайнятостів України 724.73 KB
  Розвиток економіки будь-якої держави визначається наявними людськими ресурсами, їх здібністю до ефективної праці, а також наявністю умов для її здійснення. Тому можливість займатися ефективною працею, забезпечення зайнятості та її регулювання можна розглядати як чинник забезпечення стійкого економічного зростання держави.