大内密探王二狗4:在VB中怎样用窗体中的用户控件来拖动无标题的窗体?
来源:百度文库 编辑:高考问答 时间:2024/05/11 17:11:38
在VB中怎样用窗体中的用户控件来拖动无标题的窗体?请详细说明代码
Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then Me.Move Me.Left + X, Me.Top + Y
End Sub