Donde esta mi error ????
hola, etoy comparado los datos de una columna de un msflexgrid con la hora del sistema y tengo el siguiente problema.
cuando la hora es menor que los datos que estan en la columna todo funciona bien,compara y me marca con el cursor cual es la primer diferencia encontrada. Pero cuando la hora es mayor que los datos de la columna no logro hacer que el cursor quede en la primera fila de la columna.
Esto es lo que estoy utilizando:
Private Sub Form_Initialize()
Dim g As Integer
For g = 1 To MSFlexGrid1.Rows - 2
If Time < (MSFlexGrid1.TextMatrix(g, 1)) Then GoTo fin
Next g
fin:
MSFlexGrid1.Row = g
MSFlexGrid1.ColSel = 5
End Sub
Donde Esta mi Error ???.Gracias !!!
cuando la hora es menor que los datos que estan en la columna todo funciona bien,compara y me marca con el cursor cual es la primer diferencia encontrada. Pero cuando la hora es mayor que los datos de la columna no logro hacer que el cursor quede en la primera fila de la columna.
Esto es lo que estoy utilizando:
Private Sub Form_Initialize()
Dim g As Integer
For g = 1 To MSFlexGrid1.Rows - 2
If Time < (MSFlexGrid1.TextMatrix(g, 1)) Then GoTo fin
Next g
fin:
MSFlexGrid1.Row = g
MSFlexGrid1.ColSel = 5
End Sub
Donde Esta mi Error ???.Gracias !!!
