
24/09/2008, 09:57
|
Colaborador | | Fecha de Ingreso: enero-2008 Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 17 años, 3 meses Puntos: 37 | |
Respuesta: Dudas con Data grid Cita:
Iniciado por pabje HOLA Avellaneda
He probado la matriz dinamica con los controles que me diste MSFlexGrid o MSHFlexGrid Y me anduvo muy bien.
Queria preguntarte lo siguiente:
En la primera pregunta , borrar la ultima fila , tal vez no se tan dificil, solo pregunto si es la ultima fila y resto 1 a la propieda rows del control.
Pero borrar una del medio, puede ser mas dificil, tal vez tenga simular que borro la del medio, haciendo un desplazamiento del contenido de las filas(con datos) y borrando realmente la ultima fila, ya que solo cuento con la propiedad Rows.
Gracias Nuevemente Avellaneda. Hola pabje,
no hay mayor problema, el control MSFlexgrid tiene la propiedad RemoveItem para eliminar filas del grid
Código:
Private Sub cmdEliminarFila_Click()
Dim i As Integer
With MSFlexGrid1
i = .Row
If .Row = .Rows - 1 Then
.Col = 0
If .TextMatrix(.Row, .Col) = "" Then
' última fila y en blanco, borramos sin preguntar
.RemoveItem i
Exit Sub
End If
End If
If MsgBox("¿Seguro que quieres eliminar esta fila?", vbYesNo + vbDefaultButton2 + vbQuestion, "Atención") = vbYes Then
.RemoveItem i
.Col = 0
.Row = 1
End If
End With
End Sub
|