请问右键菜单的“弹出”报错是这样的怎么解决？

Question

请问右键菜单的“弹出”报错是这样的怎么解决？
在一个子窗体当中我添加了菜单，进行了隐藏
并且添加了如下代码：
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then                    '如果是鼠标右键按下时
    PopupMenu mnufile, 0, X, Y      '弹出右键菜单
End If
End Sub报错是：“弹出菜单至少要有一个子菜单”
可是我添加了好几个阿
并且mnufile是顶层的菜单名称
这个问题大家帮忙解决一下阿
谢谢大家了。

Answer 1

怎么无缘无故又好了
是不是不能加索引啊？现在另外一个问题是
在窗体上它的位置是对的为什么在listview上面位置始终没有在鼠标旁边呢
在上方
这个问题怎么解决

Answer 2

没见过这样的用法:  PopupMenu mnufile, 0, X, Y
一般就是这样用的:  PopupMenu mnufileListView上要这样:
Private Sub ListView1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
    PopupMenu mnufile
End If
End Sub