Watch for the wraping:
Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = acLeftButton Then MsgBox "Left Button Clicked"
If Button = acRightButton Then MsgBox "right button clicked"
End Sub
HTH
Ben ----------------------------------
Ben O'Hara
bo104@westyorkshire.pnn.police.uk
----------------------------------