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

4 чел.

ЗВІТ

з лабораторної роботи № 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


 

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

22157. ОБЛІК КОРОТКОСТРОКОВИХ ЗОБОВ’ЯЗАНЬ 62.5 KB
  Поняття, оцінка та види короткострокових зобов’язань (пасивів). Облік заборгованості по рахунках постачальників та векселів виданих (векселів до сплати). Облік інших короткострокових зобов’язань. Облік заробітної плати і зобов’язань по заробітній платі.
22158. Резистивные преобразователи перемещения 2.95 MB
  Контактные преобразователи принцип действия и основные типы контактных преобразователей 4 требования к электрической цепи область применения 6 II.2 классификация реостатных преобразователей по конструктивным особенностям...
22159. ТАХОМЕТРЫ 855.42 KB
  Приборы и датчики угловой скорости Приборы предназначенные для измерения частоты вращения называются тахометрами. Тахометры применяются для измерения частоты вращения вала двигателя и его агрегатов. Наибольшее распространение получили следующие методы измерения частоты вращения по принципу действия чувствительного элемента ЧЭ: центробежные в которых ЧЭ реагирует на центробежную силу развиваемую неуравновешенными массами при вращении вала; магнитоиндукционные основанные на зависимости наводимых в металлическом теле вихревых токов от...
22160. ТЕНЗОРЕЗИСТОРЫ 114.5 KB
  2 Основные параметры и характеристики тензорезисторов. 3 Расчёт тензорезисторов. 5 Конструкция тензорезисторов. 9 Схемы включения тензорезисторов.
22161. ТЕПЛОВЫЕ ЯВЛЕНИЯ В РАЗЛИЧНЫХ СРЕДАХ 5.26 MB
  Понятия единицы измерения размерности Единицей количества тепла Q в Международной системе единиц СИ является джоуль Дж. В технике пока еще нередко применяется старая единица тепла калория кал а в англосаксонских странах Британская тепловая единица Б. Тепловой поток Ф это количество тепла проходящего через поперечное сечение А за единицу времени: Ф = . Плотность теплового потока q Дж см2 определяется как количество тепла проходящего за единицу времени t чeрез единицу площади поверхности: Теплоемкость С ранее...
22162. Методы измерения механических напряжений, сил и моментов 3.06 MB
  Измерения усилий требуется производить в различных средах в условиях действия разнообразных влияющих величин в широком диапазоне температур от 270 до 1200 С в широком частотном спектре который для механических напряжений и сил простирается от 0 до 100 к Гц а для давлений ультразвуковых волн в гидроакустике до 10 Гц. Первая группа методов наиболее широко используется для определения механических напряжений путем измерения деформации поверхности исследуемого объекта а также в приборах для измерения сил крутящих моментов и давлений....
22163. ПИРОМЕТРЫ 266.5 KB
  [4] Пирометры частичного излучения. [5] Высокотемпературные пирометры частичного излучения для контроля температуры [6] Особенности [7] ТАБЛИЦА ИНФРАКРАСНЫХ ТЕРМОМЕТРОВ ПИРОМЕТРОВ ДЛЯ ТЕХНОЛОГИЧЕСКИХ ПРОЦЕССОВ [8] Пирометры Серии М50 INFRACOUPLE [9] Пирометры серии М67 М67S. Закон Планка устанавливает связь между абсолютной температурой и спектральным распределением потока излучения светимости АЧТ: 122 Где спектральная плотность потока излучения АЧТ т.
22164. Разница между результатами измерения и истинным значением измеряемой величины 52 KB
  Представляя собой приближенные оценки значений величин найденные путем измерения они зависят не только от них но ещё и от метода измерения от технических средств с помощью которых проводятся измерения и от свойств органов чувств наблюдателя осуществляющего измерения. Разница между результатами измерения и истинным значением измеряемой величины называется погрешностью измерения. Причиной отклонения истинного значения измеряемой величины от результата измерения могут быть самые различные факторы.
22165. Порядок создания предприятия 346.63 KB
  Обычно предприниматели выбирают вид деятельности, подсказанный предыдущим профессиональным опытом. Опыт помогает сориентироваться на рынке данного вида товаров и услуг - профессионалам примерно известен спрос и особенности продукции, что даёт возможность быстро сформировать клиентуру