●這個(gè)方法很普遍,VB範(fàn)例程式就有,使用PopupMenu方法。
●在Picture1上按滑鼠右鍵會(huì)跳出名字叫 "M_Test" 的下拉式功能表: Private Sub Picture1_MouseUp(Button As Integer, X As Integer, Y As Integer) If Button = 2 Then '假若放開(kāi)滑鼠右鍵 Picture1.PopupMenu M_Test '就跳出M_Test功能表
End If
End Sub
●我們可以把功能表的Visible屬性設(shè)為False,則平時(shí)會(huì)看不見(jiàn),但用PopupMenu呼叫時(shí),功能表就會(huì)跳出來(lái)。
●MouseDown事件指的是滑鼠按鍵按下去的那一瞬間,而MouseUp事件則是滑鼠按鍵放開(kāi)的一瞬間,在發(fā)生完MouseDown與MouseUp事件就是一個(gè)Click動(dòng)作。
本站僅提供存儲(chǔ)服務(wù),所有內(nèi)容均由用戶(hù)發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)
點(diǎn)擊舉報(bào)。