爱问知识人 爱问教育 医院库

VB编写图片向左右移动不碰壁就回弹

首页

VB编写图片向左右移动不碰壁就回弹

这是我代码。 请自己实验一下有什么问题。Dim i As BooleanPrivate Sub Form_Load()i = FalseTimer1.Interval = 1End SubPrivate Sub Timer1_Timer()If i = False ThenShape1.Left = Shape1.Left - 50If Shape1.Left  Form1.ScaleWidth Theni = FalseEnd IfEnd IfEnd Sub

提交回答

全部答案

    2018-11-30 01:55:05
  • 是不是没碰到左壁?如果是语句If shape1.left<0 then 
    i=true
    end if调整一下的位置应该就可以了。

    胡***

    2018-11-30 01:55:05

类似问题

换一换
  • VB 相关知识

  • 电脑网络技术
  • 电脑网络

相关推荐

正在加载...

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 172-191
返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选):