台灣最大程式設計社群網站
線上人數
1187
 
會員總數:246274
討論主題:189809
歡迎您免費加入會員
討論區列表 >> VB6 >> [VB2008] 拋物線跟碰撞偵測問題
[]  
[我要回覆]
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
[VB2008] 拋物線跟碰撞偵測問題
價值 : 10 QP  點閱數:1966 回應數:0
樓主

天六
門外漢
0 1
35 0
發送站內信

請問要如何在 PictureBox1 的物件做拋物線跟碰撞偵測問題

或者在 ImageList1 的物件做拋物線跟碰撞偵測問題



Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

If (PictureBox1.Left <= PictureBox2.Left + PictureBox2.Width) And (PictureBox1.Left >= PictureBox2.Left - PictureBox1.Width) And (PictureBox1.Top <= PictureBox2.Top + PictureBox2.Height) And (PictureBox1.Top >= PictureBox2.Top - PictureBox1.Height) Then
PictureBox1.Visible = True
PictureBox2.Visible = False

我有用這個碰撞偵測是沒問題 可是換成拋物線就無法碰撞偵測了

本篇文章發表於2011-11-12 23:03
目前尚無任何回覆
   

回覆
如要回應,請先登入.