Построение графиков функций и диаграмм
Скачать 72.46 Kb.
|
7. Построение графиков и диаграммТема: построение графиков функций и диаграмм.Цель занятия: Приобрести практические навыки в построении графиков функции одной переменной, столбиковой диаграммы, круговой диаграммы.
В графическом режиме экран видеомонитора представляет собой набор точек, расположенных по строкам. Каждая точка на экране называется пикселем, число точек по горизонтали и вертикали определяет разрешающую способность экрана. Для работы в среде Windows разрешающая способность должна быть не менее 800х600 пикселей. Для работы с графикой Visual Basic 6.0 имеет графические объекты, графические элементы управления и графические методы. К графическим объектам относятся форма (Form) и графическое окно (Picture Box). К этим объектам могут быть применены графические методы. Графические элементы управления – позволяют помещать на графические объекты линии и геометрические фигуры. К ним относятся элементы управления Line и Shape. Особо следует выделить элемент управления Image. Он не является ни графическим объектом, ни графическим элементом управления, так как не позволяет применять графические методы, но может использоваться для вставки рисунков. Графический метод – это метод, который позволяет изображать на объекте данного класса какой-нибудь геометрический элемент, например, точку, линию, окружность и т.д. Графический метод ориентирован на абсолютную или относительную систему координат экрана дисплея. Абсолютная система координат ориентирована на верхний левый угол экрана со значениями x=0; y=0, то есть представляет собой IV квадрант прямоугольной декартовой системы координат. Основной единицей измерения в VB является твип. Твип = 1/1440 логического дюйма. Логический дюйм – это расстояние на форме, которое при печати на принтере будет равно 1 дюйму (1 дюйм =2,5 см). Используя свойство ScaleMode, можно перейти к другим единицам измерения, например: 1 - Твип (по умолчанию); 3 - Пиксель (пиксель – одна точка на экране монитора, число пикселей определяется установленным разрешением экрана Windows); Form1.ScaleMode = 3 – установлена единица измерения пиксель. Для установки другого масштаба, пользовательского, используется метод Scale. Синтаксис метода: [имяОбъекта]. Scale (x1,y1) – (x2,y2) где x1,y1 – координаты верхнего левого угла экрана; x2,y2- координаты правого нижнего угла экрана. Элемент управления Line позволяет рисовать линии различной толщины и стиля. Этот элемент обладает 15 свойствами. Основными являются X1, Y1, X2, Y2, BorderStyle , BorderWidth и BorderColor. X1, Y1 – координаты левого конца линии; X2, Y2 - координаты правого конца линии. BorderStyle - определяет стиль линии: 0 - невидимая; 1 – сплошная; 2 – пунктирная; 3 – пунктирная с коротким штрихом; 4 – штрих пунктирная; 5 – штрих- штрих пунктирная; 6- InsideSolid. Данное свойство работает только при значении свойства BorderWidth=1 BorderWidth - определяет толщину линии и может принимать любые значения кроме нуля. BorderColor - определяет цвет объекта. Существует четыре способа задания цвета:
RGB – функция формируется из трех цветов: красного, зеленого и синего. Каждый цвет задается числовой константой от 0 до 255. Например: R=100: G=150: B=75 Line.BorderColor=RGB(R,G,B) ‘темно зеленый цвет - использование констант Visual Basic. Имеется 8 констант: vbBlack - черный; vbBlue - синий; vbCyan - голубой; vbGreen - зеленый; vbMagenta - сиреневый; vbRed - красный; vbWhite - белый; vbYellow – желтый;
^ служит для изображения геометрических фигур: квадратов, прямоугольников, эллипсов, окружностей. Элемент Shape обладает практически теми же свойствами, что и элемент Line, но имеет и ряд специфических свойств. Основные свойства ^ , FillStyle, FillColor. Top, Left, Height, Width – эти свойства аналогичны свойствам других элементов управления. Они определяют положение объекта на форме и его размеры. Shape – определяет форму объекта. FillStille - обеспечивает автоматическое заполнение фигур, построенных с помощью графических методов. BorderStyle, BorderWidth – определяют стиль контура и толщину линии соответственно. Эти свойства аналогичны соответствующим свойствам объекта Line. FillColor – определяет цвет заполнения объекта, аналогичен свойству BorderColor объекта Line. Чтобы использовать режим управления пикселем необходимо установить свойство ScaleMode =3 Число твипов, приходящихся на один пиксель возвращают функции TwipsPerPixelX и TwipsPerPixelY. Для управления цветом точки используется метод Pset. Синтаксис метода: Pset(x,y) [, C]. Метод Pset можно использовать для изображения графиков функций, а также для закраски фигур произвольной формы. Для определения цвета точки используется метод Point. Синтаксис метода: Object. Point(x,y) 7.2. ЗаданиеПостроить график функции согласно варианту задания на произвольном отрезке определения функции. ^ Создать еще одну форму, на которой разместить столбиковую диаграмму по полученным значениям функции. Шаг табуляции принять достаточно большим. ^ Д  ля решения данной задачи необходимо протабулировать функцию на заданном отрезке с некоторым шагом и найти максимальное и минимальное значение функции на отрезке табулирования. Затем выполнить масштабирование формы в соответствии с вычисленными параметрами. Построить график функции, используя метод Pset. Для построения графика функции необходимо повторить операцию табулирования функции, и на каждом шаге строить точку. Чтобы график функции был плотным, шаг табулирования следует выбирать достаточно малым, например, 0.01. Разработайте форму согласно рис.7.1.
Запишите в обработчик события Click кнопки Построение текст программы: Option Explicit Dim x As Single, y As Single, m xn As Single, ymin As Single Dim xk As Single, ymax As Single, dx As Single ---------------------------------------------------------------------------------- Function FNy(x As Single) ‘ функция пользователя y = 2 * Sqr(Abs(x ^ 3)) * Sin(x) FNy = y End Function ---------------------------------------------------------------------------------- Private Sub cmdgraf_Click() Picture1.Cls Picture1.ScaleMode = 3 xn = Val(Text1(0).Text): xk = Val(Text1(1).Text): dx = Val(Text1(2).Text) ymax = FNy(xn): ymin = ymax For x = xn To xk + dx / 2 Step dx y = FNy(x) If y > ymax Then ymax = y If y < ymin Then ymin = y Next x Picture1.Scale (xn, ymax)-(xk, ymin) ‘ масштабирование формы Picture1.Line (xn, 0)-(xk, 0) ‘ ось Х-ов Picture1.Line (0, ymin)-(0, ymax) ‘ ось Y-ов For x = xn To xk + dx / 2 Step dx y = FNy(x) Picture1.PSet (x, y), vbRed Next x End Sub ----------------------------------------------------- Private Sub cmdExit_Click() End End Sub ^
^ Отчет должен содержать тему, цель занятия, задание, тексты программ, ответы на контрольные вопросы. Контрольные вопросы
|
Добавить документ в свой блог или на сайт
Похожие:
 | Познакомить учащихся с возможностями электронной таблицы excel при создании элементов деловой графики – диаграмм и графиков |  | Цель: Закрепить знания по форматированию таблиц, применению мастера функций, использованию формул в ячейках электронной таблицы.... |
| Цель: Закрепить знания по форматированию таблиц, применению мастера функций, использованию формул в ячейках электронной таблицы.... | | Электронные таблицы Excel и познакомить учащихся с понятием диаграммы изучить алгоритмом построения диаграмм и графиков в табличном... |
| Цель: Научиться правильно применять абсолютные и относительные адреса ячеек в формулах, приобрести практические навыки форматирования... | | Построение графиков функций с помощью геометрических преобразований известных графиков функций |
| Цель: Закрепить знания по применению MathCad для построения графиков функций, научиться находить экстремумы функций | | Табулирование и построение графиков функции. Построение диаграмм. Задача 5 «Табулирование функции и вычисление площади». Задача 6... |
| ... | | Цель: показать возможности использования программы Excel для решения задач различных областей знаний; научить строить графики элементарных... |