山东省莱西市旅游:在VB中怎样用窗体中的用户控件来拖动无标题的窗体?
来源:百度文库 编辑:中科新闻网 时间:2024/05/18 03:43:25
在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