Опубликован: 31.08.2006 | Доступ: свободный | Студентов: 3927 / 218 | Оценка: 4.14 / 3.89 | Длительность: 39:16:00
ISBN: 978-5-9570-0021-3
Лекция 17:

Добавление графики и эффектов анимации

< Лекция 16 || Лекция 17: 12345 || Лекция 18 >
Запуск программы Moving Icon
  1. Чтобы запустить программу, щелкните на кнопке Start (Начать). Программа Moving Icon запустится на выполнение в среде разработки.

    Примечание. Готовая программа Moving Icon лежит в папке c:\vbnet03sbs\Гл.16\moving icon.
  2. Щелкните на кнопке Переместить вверх. Объект области вывода изображений переместится по диагонали вверх, как показано ниже.


    Через некоторое время объект остановится около верхнего края формы.

  3. Щелкните на кнопке Переместить вниз. Область вывода изображений переместится обратно вниз в нижний правый угол формы.
  4. Снова щелкните несколько раз на обеих кнопках и обдумайте этот анимационный эффект. Заметьте, что вам не требуется ждать окончания анимационного эффекта пред тем, как нажать на следующую кнопку - процедура события Timer1_Tick использует переменную GoingUp для управления направлением перемещения немедленно, так что не имеет значения, когда область вывода изображений закончит движение в одном направлении. Подумайте об этом эффекте и представьте, как можно использовать аналогичную логику для создания игр на Visual Basic - увеличивать скорость анимации в соответствии с определенными условиями или "столкновениями" на экране, заставить анимированные объекты перемещаться в различных направлениях и т.п.
  5. Когда закончите работать с программой, щелкните на кнопке Закрыть формы, чтобы остановить демонстрацию.

Расширение и сжатие объектов при выполнении программы

В дополнение к свойствам Top и Left, в Visual Basic есть свойства Height и Width для большинства объектов формы. Вы можете использовать эти свойства для того, чтобы расширять или сжимать объекты при выполнении программы.

Расширение области вывода изображений во время выполнения программы

  1. В меню File (Файл) щелкните на команде Close Solution (Закрыть решение).
  2. В папке c:\vbnet03sbs\Гл.16 создайте новый проект с именем My Zoom In.
  3. Отобразите форму, щелкните в Области элементов на элементе управления PictureBox, а затем рядом с верхним левым углом формы нарисуйте небольшой объект области вывода изображений.
  4. Установите для формы и области вывода изображений следующие свойства. Когда вы установите свойства для области вывода изображений, обратите внимание на текущие значения свойств Height и Width в свойстве Size. (Вы также можете установить их при разработке формы.)

    Объект Свойство Установка
    PictureBox1 Image "c:\vbnet03sbs\Гл.16\earth.ico"
    SizeMode StretchImage
    Form1 Text Приближение к Земле
  5. Сделайте двойной щелчок мышью на объекте PictureBox1 формы. В Редакторе кода появится процедура события PictureBox1_Click.
  6. Введите в процедуре события PictureBox1_Click следующий код программы:

    PictureBox1.Height = PictureBox1.Height + 15
    PictureBox1.Width = PictureBox1.Width + 15
  7. Каждый раз, когда пользователь щелкает мышью на области вывода изображений, эти две строки увеличивают высоту и ширину значка Земли на 15 пикселей. Если вы проявите воображение, то наблюдая этот эффект вы можете представить, что вы подлетаете к Земле на космическом корабле.
  8. Чтобы запустить программу, щелкните на кнопке Start (Начать).

    Примечание. Готовая программа Zoom In лежит в папке c:\vbnet03sbs\Гл.16\zoom in.

    В форме появляется значок с изображением Земли, показанный ниже.


  9. Щелкните несколько раз на значке Земли, чтобы увеличить изображение. После 10 или 11 щелчков ваш экран должен выглядеть примерно так. 1


  10. Когда вы приблизитесь достаточно, чтобы перейти на стационарную орбиту, щелкните на кнопке Закрыть для выхода из программы. Программа остановится, и вернется среда программирования.
< Лекция 16 || Лекция 17: 12345 || Лекция 18 >
Жанболат Шаймерден
Жанболат Шаймерден

Можно ли выбирать язык для надписей и команд в среде разработки?

Анатолий Федоров
Анатолий Федоров
Россия, Москва, Московский государственный университет им. М. В. Ломоносова, 1989
Светлана Ведяева
Светлана Ведяева
Россия, Саратов