Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

[SOLUCIONADO] Datagrid con evento mouseover

Estas en el tema de Datagrid con evento mouseover en el foro de Visual Basic clásico en Foros del Web. Tengo una consulta, sobre el DataGrid, cargada con una lista de fechas, y que al pasar el mouse por cada item de la lista, aparesca ...
  #1 (permalink)  
Antiguo 18/05/2013, 15:37
 
Fecha de Ingreso: abril-2005
Ubicación: Piura - Perú
Mensajes: 189
Antigüedad: 19 años
Puntos: 0
Datagrid con evento mouseover

Tengo una consulta, sobre el DataGrid, cargada con una lista de fechas, y que al pasar el mouse por cada item de la lista, aparesca un tooltip (o usar el tooltip del datagrid) que presente cuantos días pasaron o cuantos dias falta para esa fecha que aparece en la lista. gracias
  #2 (permalink)  
Antiguo 18/05/2013, 16:12
 
Fecha de Ingreso: abril-2005
Ubicación: Piura - Perú
Mensajes: 189
Antigüedad: 19 años
Puntos: 0
Respuesta: Datagrid con evento mouseover

Encontre luego de una gran busqueda el siguiente codigo funciona a la perfección

Código vb:
Ver original
  1. Private Sub DataGrid1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  2.     Dim RowValue As Long
  3.     Dim intCols As Integer
  4.     Dim strToolTip As String
  5.     Dim fecha2 As Date
  6.     Dim fecha1 As Date
  7.    
  8.     RowValue = DataGrid1.RowContaining(Y)
  9.    
  10.     If RowValue <> -1 Then
  11.         fecha2 = CDate(DataGrid1.Columns(0).CellValue(DataGrid1.RowBookmark(RowValue)))
  12.         strToolTip = "Faltan " & DateDiff("d", Now, fecha2) & " días."
  13.     End If
  14.     DataGrid1.ToolTipText = strToolTip
  15.  
  16. End Sub

Última edición por KenMasters; 18/05/2013 a las 16:29

Etiquetas: datagrid, evento, mouseover, usar
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 04:29.