求vb.net拖动无标题窗体代码
vb.net吧
全部回复
仅看楼主
level 7
贴吧用户_0PJ813K 楼主
[email protected]谢谢
2013年03月16日 23点03分 1
level 3
子禾学长👀
我发过这样一个帖子https://tieba.baidu.com/p/2234878320
2013年03月26日 09点03分 2
level 8
飞龙在天001sky
好像啊能拖动吧
2013年03月26日 11点03分 3
level 5
wxyofchina
[拍砖]我什么都不会。。
2013年03月28日 12点03分 4
level 13
Nukepayload2
dragmove
2013年03月29日 10点03分 5
level 9
1johnn
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message) Const WM_NCHITTEST As Integer = &H84 '窗体移动 Const HTCLIENT As Integer = &H1 Const HTCAPTION As Integer = &H2
If m.Msg = WM_NCHITTEST Then Me.DefWndProc(m)
If m.Result.ToInt32() = HTCLIENT Then m.Result = New IntPtr(HTCAPTION) Else MyBase.WndProc(m) End If Else MyBase.WndProc(m) End If End Sub
2013年03月30日 15点03分 6
1johnn
改一下formborderstyle
2013年03月30日 15点03分
Nukepayload2
不用这么麻烦。在mousemove里利用鼠标的坐标变化改变窗体的位置，代码更短。
2013年04月01日 05点04分
贴吧用户_0PJ813K
不好的，假如在win7 8系统，你拖动窗体晃两下，其他窗口不会最小化
2013年04月01日 14点04分
贴吧用户_0PJ813K
不好的，假如在win7 8系统，你拖动窗体晃两下，其他窗口不会最小化
2013年04月01日 14点04分
level 9
1johnn
你是复读机哈[瀑布汗~]
2013年04月01日 14点04分 7
1