鼠标按住任意控件拖动窗口

导入系统.绘图.pointpublicclassmoveclassmoveprivatewitheventscontrollasssystem .窗口。表格。controlprivatemouse _ offsetaspintprivatefrmasformpublicsubnew()SubNew(ByVal 0，1)'控制系统.窗户。Forms.Control，by val forms)me . Control=Control的元素，与der Maus gezogen werdenMe.frm一起使用。endsubprivatesubgroupcontrol 1 _ MouseDown()subgroupcontrol 1 _ MouseDown(ByValsenderAsObject，ByVal)

0, 0, 1)"> e /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">As/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> System.Windows.Forms.MouseEventArgs) /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Handles/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> control.MouseDown
        mouse_offset /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)"/span>/span>/span>/span>/span>span class="xzm_is" data-txt="New#3C"/span>/span>/span>/span>/span>/span>/span/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> Point(e.X, e.Y)
    /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">End Sub/span>/span>/span>/span>/span>/span/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>/span>/span>/span>/span>br/span>/span>/span>/span>/span>br>    /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Private/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> /span>/span>/span>/span>/span>span id="Codehighlighter1_554_985_Closed_Text" style="border: 1px solid rgba(128, 128, 128, 1); display: none; background-color: rgba(255, 255, 255, 1)">Sub GroupControl1_MouseMove()/span>/span>/span>/span>/span>span id="Codehighlighter1_554_985_Open_Text"/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Sub/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> GroupControl1_MouseMove(/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)"/span>/span>/span>/span>span class="xzm_is" data-txt="ByVal#3C"/span>/span>/span>/span>/span>/span/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> sender /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">As/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Object/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">, /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)"/span>/span>/span>/span>span class="xzm_is" data-txt="ByVal#3C"/span>/span>/span>/span>/span>/span/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> e /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">As/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> System.Windows.Forms.MouseEventArgs) /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Handles/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> control.MouseMove/span>/span>/span>/span>/span>br>        /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">If/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> (e.Button /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> MouseButtons.Left /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Or/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> e.Button /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> MouseButtons.Right) /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Then/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>/span>/span>/span>/span>br>            /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Dim/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> mousePos /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">As/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> Point /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> frm.MousePosition
            /span>/span>/span>/span>/span>span style="color: rgba(0, 128, 0, 1)">'/span>/span>/span>/span>/span>span style="color: rgba(0, 128, 0, 1)">获得鼠标偏/span>/span>/span>/span>/span/span>/span>/span>/span>/span/span>/span>/span>/span>/span>span style="color: rgba(0, 128, 0, 1)"/span>/span>/span>/span>/span>br/span>/span>/span>/span>/span>/span/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">            mousePos.Offset(/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">-/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">mouse_offset.X, /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">-/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">mouse_offset.Y)
            /span>/span>/span>/span>/span>span style="color: rgba(0, 128, 0, 1)">'/span>/span>/span>/span>/span>span style="color: rgba(0, 128, 0, 1)">设置窗体随鼠标一起移动/span>/span>/span>/span>/span>span style="color: rgba(0, 128, 0, 1)"/span>/span>/span>/span>/span>br/span>/span>/span>/span>/span>/span/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">            frm.Location /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> mousePos
        /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">End/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">If/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>/span>/span>/span>/span>br/span>/span>/span>/span>/span>br>    /span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">End Sub/span>/span>/span>/span>/span>/span/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>/span>/span>/span>/span>br/span>/span>/span>/span>/span>/span/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">End Class/span>/span>/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>/span>/span>/span>/span>br/span>/span>/span>/span>/span>/span>使用：/span>/span>/span>/span>/span>br>在窗口加载时：/span>/span>/span>/span>/span>br>Move move = new Move(this.label1,this)
这样鼠标按住 label1 拖动时，窗口就会移动。

/span>/span>/span>/span>/span>/div>

标签：