Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Инфоурок / Информатика / Другие методич. материалы / Практическая работа при изучении графических возможностей ЯП VisualBasic (11 класс)

Практическая работа при изучении графических возможностей ЯП VisualBasic (11 класс)

  • Информатика

Название документа Проект_Погода в мае.docx

Поделитесь материалом с коллегами:

Проект «Погода в мае»

Графический интерфейс

  1. Создайте графический интерфейс по образцу:

hello_html_1328b520.png

hello_html_m30379e3.png

  1. Для выделения на форме области графика загрузите соответствующий компонент: ProjectComponents → вкладка Control → выбрать Microsoft Chart Control.

hello_html_m3581745c.pnghello_html_m3231df1c.png

  1. На панели инструментов появиться новый объект

hello_html_m3d8812a1.png

  1. Выбрать его и выделить на форме область расположения графика.

hello_html_26166932.png

  1. Выберите тип диаграммы – график: свойство Chart Type = 3.

Программа

Программные блоки

Примечание

  1. Заполнение списков дат и температур при загрузке формы:

Private Sub Form_Load()

Randomize

For i = 0 To 9

List1.List(i) = (i + 1) & " мая "

List2.List(i) = CStr(5 + Int(Rnd * 15))

Next i

MSChart1.Visible = False

End Sub

Randomize – запускает генератор случайных чисел


& (and) - присоединяет к числу (i+1) слово “мая”


CStr() – преобразует число в строковую (символьную) величину, т.к. поле List является текстовым


Свойство Visible = False объекта MSChart1 делает график изначально невидимым при запуске программы

  1. Нахождение и вывод максимальной температуры и ее даты по нажатию кнопки Статистика (Command1):

nmax = 0

For i = 1 To 9

t = Val(List2.List(i))

tmax = Val(List2.List(nmax))

If t > tmax Then nmax = i

Next i

Label3.Caption = "Максимальная t= " & List2.List(nmax) & " градусов наблюдалась " & nmax + 1 & " мая"


nmax – номер максимального элемента


tmax – максимальное значение температуры

  1. Нахождение и вывод минимальной температуры и ее даты

Разработать самостоятельно

  1. Расчет средней температуры

s = 0

For i = 0 To 9

t = Val(List2.List(i))

s = s + t

Next i

sred = s / 10

Label7.Caption = "Средняя t= " & sred & " градусов "


s – сумма температур


t – значения температур из списка (List2)


sred – среднее значение температуры

  1. Построение графика распределения температур по нажатию клавиши График (Command2):

Dim d(0 To 9, 1 To 2) As Variant

Private Sub Command2_Click()

For i = 0 To 9

d(i, 1) = List1.List(i)

d(i, 2) = Val(List2.List(i))

Next i

MSChart1.ChartData = d

MSChart1.TitleText = "График температур"

MSChart1.Visible = True

End Sub


d – двумерный массив из 10 строк и 2 столбцов:

1-й столбец содержит элементы из списка 1 (даты),

2-й столбец содержит элементы из списка 2 (значения температуры).


Тип Variant означает, что элементы 1-го столбца воспринимаются как подписи по оси Х на графике, а элементы 2-го столбца являются данными для построения самого графика.


Свойство Visible = True объекта MSChart1 делает график видимым



Название документа Проект_Погода в мае.ppt

Поделитесь материалом с коллегами:

Проект «Погода в мае» Обработка списков. Визуализация данных
Графический интерфейс
1. Разместите на форме указанные объекты для размещения исходных данных и выв...
2. Для выделения на форме области графика загрузите соответствующий компонент...
Для выделения на форме области графика загрузите соответствующий компонент: P...
3. На панели инструментов появиться новый объект MSChart
4. Выбрать его и выделить на форме область расположения графика. 5. Выбрать т...
Программа Заполнение списков дат и температур при загрузке формы (Form_Load()...
1. Заполнение списков дат и температур при загрузке формы Программные блоки	П...
2. Нахождение и вывод максимальной температуры и ее даты по нажатию кнопки Ст...
3. Нахождение и вывод минимальной температуры и ее даты
4. Расчет средней температуры Программные блоки	Примечание s = 0 For i = 0 To...
5. Построение графика по нажатию клавиши График (Command2): Программные блоки...
6. Проект готов. Сохранить файл с расширением .ехе (File → Make…exe…). 7. Зап...
1 из 15

Описание презентации по отдельным слайдам:

№ слайда 1 Проект «Погода в мае» Обработка списков. Визуализация данных
Описание слайда:

Проект «Погода в мае» Обработка списков. Визуализация данных

№ слайда 2 Графический интерфейс
Описание слайда:

Графический интерфейс

№ слайда 3 1. Разместите на форме указанные объекты для размещения исходных данных и выв
Описание слайда:

1. Разместите на форме указанные объекты для размещения исходных данных и вывода результатов статистической обработки

№ слайда 4 2. Для выделения на форме области графика загрузите соответствующий компонент
Описание слайда:

2. Для выделения на форме области графика загрузите соответствующий компонент (Microsoft Chart Control), в результате чего на панели инструментов появится новый объект - MSChart.

№ слайда 5
Описание слайда:

№ слайда 6 Для выделения на форме области графика загрузите соответствующий компонент: P
Описание слайда:

Для выделения на форме области графика загрузите соответствующий компонент: Project → Components → вкладка Control → выбрать Microsoft Chart Control.

№ слайда 7 3. На панели инструментов появиться новый объект MSChart
Описание слайда:

3. На панели инструментов появиться новый объект MSChart

№ слайда 8 4. Выбрать его и выделить на форме область расположения графика. 5. Выбрать т
Описание слайда:

4. Выбрать его и выделить на форме область расположения графика. 5. Выбрать тип диаграммы – график: свойство Chart Type = 3.

№ слайда 9 Программа Заполнение списков дат и температур при загрузке формы (Form_Load()
Описание слайда:

Программа Заполнение списков дат и температур при загрузке формы (Form_Load()). Нахождение и вывод максимальной температуры и ее даты. Нахождение и вывод минимальной температуры и ее даты. Расчет средней температуры. Построение графика распределения температур по нажатию клавиши График (Command2_Click()). по нажатию клавиши Статистика (Command1_Click())

№ слайда 10 1. Заполнение списков дат и температур при загрузке формы Программные блоки	П
Описание слайда:

1. Заполнение списков дат и температур при загрузке формы Программные блоки Примечание Private Sub Form_Load() Randomize For i = 0 To 9 List1.List(i) = (i + 1) & " мая " List2.List(i) = CStr(5 + Int(Rnd * 15)) Next i MSChart1.Visible = False End Sub Randomize – запускает ГСЧ & (and) - присоединяет к числу (i+1) слово “мая” CStr() – преобразует число в строковую величину Свойство Visible = False объекта MSChart1 делает график изначально невидимым при запуске программы

№ слайда 11 2. Нахождение и вывод максимальной температуры и ее даты по нажатию кнопки Ст
Описание слайда:

2. Нахождение и вывод максимальной температуры и ее даты по нажатию кнопки Статистика Программные блоки Примечание nmax = 0 For i = 1 To 9 t = Val(List2.List(i)) tmax = Val(List2.List(nmax)) If t > tmax Then nmax = i Next i Label3.Caption = "Максимальная t= " & List2.List(nmax) & " градусов наблюдалась " & nmax + 1 & " мая" nmax – номер максимального элемента tmax – максимальное значение температуры

№ слайда 12 3. Нахождение и вывод минимальной температуры и ее даты
Описание слайда:

3. Нахождение и вывод минимальной температуры и ее даты

№ слайда 13 4. Расчет средней температуры Программные блоки	Примечание s = 0 For i = 0 To
Описание слайда:

4. Расчет средней температуры Программные блоки Примечание s = 0 For i = 0 To 9 t = Val(List2.List(i)) s = s + t Next i sred = s / 10 Label7.Caption = "Средняя t= " & sred & " градусов " s – сумма температур t – значения температур из списка (List2) sred – среднее значение температуры

№ слайда 14 5. Построение графика по нажатию клавиши График (Command2): Программные блоки
Описание слайда:

5. Построение графика по нажатию клавиши График (Command2): Программные блоки Примечание Dim d(0 To 9, 1 To 2) As Variant Private Sub Command2_Click() For i = 0 To 9 d(i, 1) = List1.List(i) d(i, 2) = Val(List2.List(i)) Next i MSChart1.ChartData = d MSChart1.TitleText = "График температур" MSChart1.Visible = True End Sub d – двумерный массив : 1-й столбец содержит элементы из списка 1, 2-й столбец содержит элементы из списка 2. Тип Variant означает, что элементы 1-го столбца воспринимаются как подписи по оси Х на графике, а элементы 2-го столбца являются данными для построения самого графика.

№ слайда 15 6. Проект готов. Сохранить файл с расширением .ехе (File → Make…exe…). 7. Зап
Описание слайда:

6. Проект готов. Сохранить файл с расширением .ехе (File → Make…exe…). 7. Запустить файл с расширением .ехе на исполнение.

Выберите курс повышения квалификации со скидкой 50%:

Автор
Дата добавления 24.06.2016
Раздел Информатика
Подраздел Другие методич. материалы
Просмотров47
Номер материала ДБ-132060
Получить свидетельство о публикации

Включите уведомления прямо сейчас и мы сразу сообщим Вам о важных новостях. Не волнуйтесь, мы будем отправлять только самое главное.
Специальное предложение
Вверх