如何在程序运行后，用鼠标的左键拖动控件到窗体的任意位置.txt

VB技巧问答10000例 VB技巧问答10000例

绝 大 多 数 VB控 件 都 支 持 拖 放 。 你 可 以 将 控 件 的 DragMode设 置 为 自 动 ， 这 样 用 户 就 可 以 拖 动 ， 然 后 加 入 如 下 代 码 ： 
    Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single) 
     Source.Move X, Y 
    End Sub 
    这 样 当 用 户 放 下 控 件 时 ， 控 件 就 可 以 移 动 到 那 里 。 
    也 可 以 将 控 件 的 DragMode设 置 为 手 动 （ 默 认 ） ， 使 用 Drag方 法 开 始 拖 动 操 作 。 
<END>