Перемещение объекта - VB

Узнай цену своей работы

Формулировка задачи:

Как переместить объект (пусть прямоугольник) влево, вправо, вверх и вниз? Одним словом, как это все перемещать? Подсказывают, что через Mode, но как?!

Решение задачи: «Перемещение объекта»

textual
Листинг программы
  1. Dim ugol ' что значит уго?
  2. Const Pi = 3.1415926
  3.  
  4. Private Sub Form_Load()
  5. ugol = 0
  6. Timer1.Interval = 100 ' что дает изменение интервала?
  7. End Sub
  8.  
  9. Private Sub Timer1_Timer()
  10. Shape1.Move Sin(ugol) * 500 + 1000, Cos(ugol) * 500 + 1000
  11. ' Красное - размещение объекта на форме, а зеленное - это радиус или скорость?
  12. ugol = IIf(ugol > 2 * Pi, ugol - 2 * Pi + 0.5, ugol + 0.5) ' Если здесь поменять знаки на противоположные, то объект будет двигаться в другую сторону?
  13. End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 3.75 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут