326991
столько раз учителя, ученики и родители
посетили сайт «Инфоурок»
за прошедшие 24 часа
+Добавить материал
и получить бесплатное
свидетельство о публикации
в СМИ №ФС77-60625 от 20.01.2015
Дистанционные курсы профессиональной переподготовки и повышения квалификации для педагогов

Дистанционные курсы для педагогов - курсы профессиональной переподготовки от 5.520 руб.;
- курсы повышения квалификации от 1.200 руб.
Престижные документы для аттестации

ВЫБРАТЬ КУРС СО СКИДКОЙ ДО 70%

ВНИМАНИЕ: Скидка действует ТОЛЬКО сейчас!

(Лицензия на осуществление образовательной деятельности № 5201 выдана ООО "Инфоурок")

ИнфоурокИнформатикаДругие методич. материалыПроект по информатике «Летящая птица»

Проект по информатике «Летящая птица»

библиотека
материалов
Скачать материал целиком можно бесплатно по ссылке внизу страницы.

Артюшкина В.А. учитель информатики

СОШЛ№20

Проект «Летящая птица»


Создайте в графическом редакторе два рисунка

hello_html_m40fd5ed0.gifhello_html_223171fb.gif




При сохранении файлов рисунков присвойте им имя fly.bmp, fly1.bmp.


Создайте форму, разместите на ней кнопку Command1 присвойте ей св-во Caption- Запустить и введите для нее программный код.


Private Sub Command1_Click()

Dim objPics(1) As Picture

For i = 1 To 10

For J = 1 To 20050000

Next J

Set objPics(0) = LoadPicture("fly.bmp")

Set objPics(1) = LoadPicture("fly1.bmp")

Static intCount As Integer

If intCount = 0 Then

intCount = 1

Else

intCount = 0

End If

PaintPicture objPics(intCount), 0, 0

Next i


End Sub


Создайте вторую кнопку Command2 и присвойте ей св-во Caption- Закрыть и введите программный код закрывающий форму.



Краткое описание документа:

В школе каждый учитель сталкивается с проблемой при прохождении раздела по программированию, будь это визуальное программирование или иные языки программирования. Чтобы вызвать интерес к предмету учителю необходимо разрабатывать интересные проекты, которые учащиеся выполнили бы в рамках одного урока и посмотрели на результат своей деятельности. Ведь только тогда появится стимул к выполнению лабораторно-практических работ . Предлагаю разработку такого вот проекта, в котором учащиеся проработают материал и в графическом редакторе и в среде визуального программирования.

Общая информация

Номер материала: 38132032631

Вам будут интересны эти курсы:

Курс повышения квалификации «Табличный процессор MS Excel в профессиональной деятельности учителя математики»
Курс повышения квалификации «Методика преподавания информатики в начальных классах»
Курс повышения квалификации «Современные информационные технологии и их использование в работе преподавателей. Системы автоматизированного проектирования одежды и организация технологического процесса»
Курс повышения квалификации «Внедрение системы компьютерной математики в процесс обучения математике в старших классах в рамках реализации ФГОС»
Курс профессиональной переподготовки «Информатика: теория и методика преподавания в образовательной организации»
Курс повышения квалификации «Облачные технологии в образовании»
Курс «Фирменный стиль» (Corel Draw, Photoshop)
Курс «Оператор персонального компьютера»
Курс повышения квалификации «Развитие информационно-коммуникационных компетенций учителя в процессе внедрения ФГОС: работа в Московской электронной школе»
Курс профессиональной переподготовки «Информационные технологии в профессиональной деятельности: теория и методика преподавания в образовательной организации»
Курс повышения квалификации «Специфика преподавания информатики в начальных классах с учетом ФГОС НОО»
Курс повышения квалификации «Введение в программирование на языке С (СИ)»
Курс профессиональной переподготовки «Теория и методика обучения информатике в начальной школе»
Курс повышения квалификации «Специфика преподавания дисциплины «Информационные технологии» в условиях реализации ФГОС СПО по ТОП-50»
Курс повышение квалификации «Применение интерактивных образовательных платформ на примере платформы Moodle»
Включите уведомления прямо сейчас и мы сразу сообщим Вам о важных новостях. Не волнуйтесь, мы будем отправлять только самое главное.
Онлайн-конференция Идет регистрация