pop up menu

[Doomy]

well im trying to make a menu pop up if you right click an npc however i get the following error
Compile Error:
Wrong Number of Dimensions
with this highlighted

If Button = 2 Then
x = CurX
y = CurY

For I = 1 To MAX_MAP_NPCS
If MapNpc(Map, I).Num > 0 And MapNpc(Map, I).Num < 50 Then
NpcMenu1.Left = CurX - NpcMenu1.Width
NpcMenu1.Top = CurY - NpcMenu1.Height
End If