Dim p As Point = Cursor.Position
成都创新互联专注于通化网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供通化营销型网站建设,通化网站制作、通化网页设计、通化网站官网定制、小程序定制开发服务,打造通化网络公司原创品牌,更为您提供通化网站排名全网营销落地服务。
Form2.Show()
Form2.Location = p
可以的,设置边框窗户,
设置可拖动
releasecapture()
sendmessage wm_syscommand ,htcaption or wm_move
置顶
setwindowpos -1,0,0,0,0,H1 or H2
在你的主窗体里找到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