Este evento se utiliza para determinar si el ususario movio la rueda del mouse sobre un objeto.
Es util para utilizarlo sobre tableview o gridview, para desplazar la hoja hacia arriba o hacia abajo.

PUBLIC SUB TableViewclientes_MouseWheel()
IF (mouse.Delta = 1) THEN
TableViewclientes.ScrollX = TableViewclientes.ScrollX - 2 ' para desplazar la "hoja" hacia arriba
ENDIF

IF mouse.Delta = -1 THEN
TableViewclientes.ScrollX = TableViewclientes.ScrollX + 2 'para desplazar la "hoja" hacia abajo
ENDIF
END