从品牌网站建设到网络营销策划,从策略到执行的一站式服务
在你的主窗体里找到MouseDown事件
创新互联建站专注于广水网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供广水营销型网站建设,广水网站制作、广水网页设计、广水网站官网定制、微信小程序定制开发服务,打造广水网络公司原创品牌,更为您提供广水网站排名全网营销落地服务。
如果是任意点击的用下面的代码就足够了
如果一定要是边框的话你要给出边框的高度(以像素为单位)
我的QQ:575297577
Private Sub 主窗体_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown
If e.Button = Windows.Forms.MouseButtons.Right Then
你的窗体.Show()
End If
End Sub
let children: Children:对象的子节点。
displayStyle: Mirror.DisplayStyle?:对象的展示风格
let subjectType: Any.Type:对象的类型
func superclassMirror() - Mirror?:对象父类的 mirror
上面的回答不完美,在窗口的任意地方右击都会弹出窗口,所以要力求完美,必须先判断红框的坐标,在红框范围内再弹出窗口 If e.Button = Windows.Forms.MouseButtons.Right Then If e.X 153 And e.X 601 And e.Y 1 And e.Y 25 Then '红框的坐标范围,在这个范围内右击有效(获取的技巧见下面) Form2.ShowDialog() End If End If 小技巧: 如何获取你限定的红色框的范围? 用mousemove事件和一个label控件做测试: Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove Label1.Text = e.X "=" e.Y End Sub 记录下坐标即可!
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图