Article ID: 190992
Article Last Modified on 10/31/2003
Private Sub Adodc1_MouseDown(Button As Integer, Shift As Integer, x _
As Single, y As Single)
Debug.Print "Down"
End Sub
Private Sub Adodc1_MouseMove(Button As Integer, Shift As Integer, x _
As Single, y As Single)
Debug.Print "Move"
End Sub
Private Sub Adodc1_MouseUp(Button As Integer, Shift As Integer, x _
As Single, y As Single)
Debug.Print "Up"
End Sub
Keywords: kbbug kbctrl KB190992