作者yauhh (哟)
看板Visual_Basic
标题Re: [VB6 ] 请各位帮帮忙
时间Sat Apr 18 13:36:51 2009
※ 引述《vfionnkg (vfionnkg)》之铭言：
: 我写了一个关於打砖块的程式,我是判断砖块跟球的,如果球碰到砖块,砖块会隐藏,
: 然後得到1分,老师说砖块只是隐藏起来,并不是不见了,其实它是存在的
: 请问要如果判断砖块真的不存在,然後球就会反弹到杆子的方向
: If Shape3(z).Left <= Shape2.Left + Shape2.Width / 2 And Shape3(z).Left + Shape3(z).Width >= Shape2.Left + Shape2.Width / 2 And Shape3(z).Top + Shape3(z).Height >= Shape2.Top And Shape3(z).Top <= Shape2.Top + Shape2.Height And Shape3(z).Visible = True Then y = -y: Shape3(z).Visible = False: score = score + 1
以上 If 条件只考虑球和砖块的相对位置. 但你应该要同时考虑砖块是隐藏或存在的,
把 Shape3(z).Visible 情况也加进来比较.
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 218.160.112.100