这种行为是系统规定的,这里有个解决的办法你新建个Form(我取名叫frmMenu),然后把要在第2个模式窗口弹出的菜单放到这个新frmMenu上.下面你就可以... frmMain: Private Sub mnuAdvancePreference_Click() frmSettings.Show vbModal End SubfrmSettings: Private Sub lvServerList_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = vbRightButton Then PopupMenu frmMenu.mnuPopServerListOp End If End Sub
一级用右键菜单,弹出普通窗口,把前一窗体ENABLED了,二级菜单就行了
frmMain:
Private Sub mnuAdvancePreference_Click()
frmSettings.Show vbModal
End SubfrmSettings:
Private Sub lvServerList_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
PopupMenu frmMenu.mnuPopServerListOp
End If
End Sub
MSN [email protected]
EMAIL [email protected]