试试这样
窗口AfterLoad 写
e.Form.Controls("NavBar1").StackButtonCount = 0
控件中
MouseMove中写
If e.Button = MouseButtons.Left Then e.Sender.StackButtonCount = 0End If
MouseUp中写
e.Sender.StackButtonCount = 0