万分火急!本人在设计小游戏时出现的问题,望大家务必帮忙,在线等!

airflight1981 2004-07-08 03:10:46
请看下面的代码:
For i1 = 0 To 7

If (Command2.Top >= Command3(i1).Top And Command2.Top <= Command3(i1).Top + 490) And (Command2.Left > Command3(i1).Left And Command2.Left <= Command3(i1).Left + 1210) Then
Command2.Top = 9000: Command2.Left = Command1.Left + 590
Command3(i1).Visible = False
next i1

其中,command3为控件数组,共有8个它,可在屏幕中不断下降(通过其他语句),它的height和width属性分别为495和1215.以上代码的意思是如过command3中的任何一个command与command2向遇时,即两者重合,两者便消失,但实际运行后两者却都不能消失.望大家帮忙解决,本人万分着急!
...全文
95 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
cinrd 2004-07-08
  • 打赏
  • 举报
回复
少了一个endif
airflight1981 2004-07-08
  • 打赏
  • 举报
回复
什么叫top的差下于距离?
aoenzh 2004-07-08
  • 打赏
  • 举报
回复
我的意思是,你应该判断
他们两个的top的差如果下于距离,就Command3(i1).Visible = False

1,453

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧