您的位置：成都3c购物 >> 资讯中心 >> 可拖动的无标题栏窗体-asp.net教程
可拖动的无标题栏窗体-asp.net教程
转载自：互联网 作者：cd3c.com
您正在看的asp.net教程是:可拖动的无标题栏窗体。
注意：要设置form的controlbox属性为false，
特别注意： form.text要设置为空,否则不会把标题栏去掉
Dim MousX As Integer
Dim MousY As Integer
Dim CurrX As Integer
Dim CurrY As Integer
Public Sub myMouseDown(ByVal sender As Object, ByVal ex As MouseEventArgs) Handles MyBase.MouseDown
If ex.Button = MouseButtons.Left Then
'如果是鼠标左键，则不捕获鼠标
Me.Capture() = False
'获得鼠标坐标（相对于窗体）
MousX = ex.X
MousY = ex.Y
End If
[1] [2] [3] 下一篇
