快捷菜单弹不了来

Question

窗体上有个ListView，我想在ListView上面选择一行时弹出快捷菜单Private Sub Merchandise_ListView_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
    If Button = 2 Then
        PopupMenu Pop_Menu
    End If
End Sub我打开这个窗体有二个方法，一个是直接Form1.show vbmodal,这个时候快捷菜单是可以弹出的；
还有一种方法是先load form1,再执行一个窗体的初始化form1.init(),再form.show vbmodal,这个时候快捷菜单就弹不出来了。（form1.init（）方法基本没涉及到Pop_Menu菜单）
后来我在窗体上加了个按钮，把PopupMenu Pop_Menu放在按钮事件中情况也一样，好象第二种情况下popupmenu无效了一样。
这是为什么，我想不出什么原因，哪位能给个解决方法