Ayuda con MouseMove en VB6

[ime]

Hola amigos tengo este código usando el MouseMove, el problema es que pinta la fila pero dando click al registro de MSHFlexiGrid, como le haría para que cuando mueva el mouse me vaya pintando la fila donde se encuentre el puntero. ayuda porfa.



Private Sub flex_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
 Dim z
 
   For z = 0 To flex.Cols - 1
   flex.Col = z
   flex.CellBackColor = RGB(140, 198, 255)
   Next z
End Sub

[Danyfirex]

si te refieres a mientras esta arriba pinte y cuando luego lo muevas a otra parte quite el color.

mejor déjalo para carnaval. seria muy muy fastidioso.

no te recomiendo hacer eso seria algo fastidioso e innecesaria.