OnScreen floating menu

[ltt19]

Hi

I wan tto do a program that when the user activates the program it shows a contextmenu in the screen (without the form) and nothing more. But the menu must appear where the mouse is. I trued to do as below, but the menu appears not in the RIGHT position of the mouse. it also does not close when I click out of it

The code is here

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Loa

Dim str As Strin
Dim mnu As New ContextMen

For Each str In IO.Directory.GetFiles(path, "*.lnk"
mnu.MenuItems.Add(str.Replace(path & "\Microsoft Office", String.Empty).Replace(".lnk", String.Empty)
Nex
mnu.Show(Me, Control.MousePosition
Application.Run(

End Su

Any help will be very useful

Thanks