Имитация движения жидкости в трубе - VB

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

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

Изображение в окне приложения должно имитировать движение жидкости в трубе. Окно настройки параметров трубы появляется после двойного «клика» на области ее изображения. Элементы управления окна настройки должны предоставляют возможность управлять следующими параметрами трубы : • ориентация (вертикальная или горизонтальная); • геометрические размеры (диаметр и длина), в условных единицах; • параметры жидкости – скорость течения и цвет в условных единицах; • направление течения жидкости выбирается с использованием кнопок «влево», «вправо», «вверх», «вниз», но с учетом предыдущего выбора ориентации трубы, причем, если выбрана вертикальная ориентация, кнопки «влево», «вправо» становятся неактивными. Визуально перемещению жидкости, в том числе и с учетом скорости и направления ее движения, должно соответствовать перемещение элементов штриховки трубы. помогите ошибку исправить с " elline" код уже есть со всем но не могу от ошибки избавится,может упустил что то...

Решение задачи: «Имитация движения жидкости в трубе»

textual
Листинг программы
Private Sub Timer2_Timer() ' таймер движения
For i = 0 To n
With elline(i)
 .Move .Left - sp, .Top
If .Left < 1100 Then .Left = 2800
If .Left > 2800 Then .Left = 1100
End With
Next i
End Sub

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


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

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

5   голосов , оценка 4.6 из 5
Похожие ответы